ym.c revision 1.8 1 /* $NetBSD: ym.c,v 1.8 1999/02/17 23:05:29 mycroft Exp $ */
2
3
4 /*
5 * Copyright (c) 1998 Constantine Sapuntzakis. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. 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, BUT
23 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 */
29
30 /*
31 * Original code from OpenBSD.
32 */
33
34
35 #include <sys/param.h>
36 #include <sys/systm.h>
37 #include <sys/errno.h>
38 #include <sys/device.h>
39
40 #include <machine/cpu.h>
41 #include <machine/intr.h>
42 #include <machine/bus.h>
43
44 #include <sys/audioio.h>
45 #include <dev/audio_if.h>
46
47 #include <dev/isa/isavar.h>
48 #include <dev/isa/isadmavar.h>
49
50 #include <dev/ic/ad1848reg.h>
51 #include <dev/isa/ad1848var.h>
52 #include <dev/ic/opl3sa3.h>
53 #include <dev/isa/ymvar.h>
54
55
56 int ym_getdev __P((void *, struct audio_device *));
57 int ym_mixer_set_port __P((void *, mixer_ctrl_t *));
58 int ym_mixer_get_port __P((void *, mixer_ctrl_t *));
59 int ym_query_devinfo __P((void *, mixer_devinfo_t *));
60
61 static void ym_mute __P((struct ym_softc *, int, int));
62 static void ym_set_master_gain __P((struct ym_softc *, struct ad1848_volume*));
63 static void ym_set_mic_gain __P((struct ym_softc *, struct ad1848_volume *));
64
65
66
67 struct audio_hw_if ym_hw_if = {
68 ad1848_isa_open,
69 ad1848_isa_close,
70 NULL,
71 ad1848_query_encoding,
72 ad1848_set_params,
73 ad1848_round_blocksize,
74 ad1848_commit_settings,
75 NULL,
76 NULL,
77 NULL,
78 NULL,
79 ad1848_halt_out,
80 ad1848_halt_in,
81 NULL,
82 ym_getdev,
83 NULL,
84 ym_mixer_set_port,
85 ym_mixer_get_port,
86 ym_query_devinfo,
87 ad1848_isa_malloc,
88 ad1848_isa_free,
89 ad1848_isa_round_buffersize,
90 ad1848_isa_mappage,
91 ad1848_isa_get_props,
92 ad1848_isa_trigger_output,
93 ad1848_isa_trigger_input,
94 };
95
96
97 struct audio_device ym_device = {
98 "ym,ad1848",
99 "",
100 "ym"
101 };
102
103 static __inline int ym_read __P((struct ym_softc *, int));
104 static __inline void ym_write __P((struct ym_softc *, int, int));
105
106 void
107 ym_attach(sc)
108 struct ym_softc *sc;
109 {
110 struct ad1848_softc *ac = &sc->sc_ad1848.sc_ad1848;
111 struct ad1848_volume vol_mid = {220, 220};
112 struct ad1848_volume vol_0 = {0, 0};
113
114 sc->sc_ad1848.sc_ih = isa_intr_establish(sc->sc_ic, sc->ym_irq,
115 IST_EDGE,
116 IPL_AUDIO, ad1848_isa_intr,
117 &sc->sc_ad1848);
118
119 ad1848_isa_attach(&sc->sc_ad1848);
120 printf("\n");
121 ac->parent = sc;
122
123 /* Establish chip in well known mode */
124 ym_set_master_gain(sc, &vol_mid);
125 ym_set_mic_gain(sc, &vol_0);
126 sc->master_mute = 0;
127 ym_mute(sc, SA3_LCH, sc->master_mute);
128 ym_mute(sc, SA3_RCH, sc->master_mute);
129
130 sc->mic_mute = 1;
131 ym_mute(sc, SA3_MIC, sc->mic_mute);
132
133 audio_attach_mi(&ym_hw_if, ac, &ac->sc_dev);
134 }
135
136 static __inline int
137 ym_read(sc, reg)
138 struct ym_softc *sc;
139 int reg;
140 {
141 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 0, 0x1d);
142 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 0, (reg & 0xff));
143 return (bus_space_read_1(sc->sc_iot, sc->sc_controlioh, 1));
144 }
145
146 static __inline void
147 ym_write(sc, reg, data)
148 struct ym_softc *sc;
149 int reg;
150 int data;
151 {
152 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 0, 0x1d);
153 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 0, (reg & 0xff));
154 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 1, (data & 0xff));
155 }
156
157
158
159 int
160 ym_getdev(addr, retp)
161 void *addr;
162 struct audio_device *retp;
163 {
164 *retp = ym_device;
165 return 0;
166 }
167
168
169 static ad1848_devmap_t mappings[] = {
170 { YM_MIDI_LVL, AD1848_KIND_LVL, AD1848_AUX2_CHANNEL },
171 { YM_CD_LVL, AD1848_KIND_LVL, AD1848_AUX1_CHANNEL },
172 { YM_DAC_LVL, AD1848_KIND_LVL, AD1848_DAC_CHANNEL },
173 { YM_LINE_LVL, AD1848_KIND_LVL, AD1848_LINE_CHANNEL },
174 { YM_SPEAKER_LVL, AD1848_KIND_LVL, AD1848_MONO_CHANNEL },
175 { YM_MONITOR_LVL, AD1848_KIND_LVL, AD1848_MONITOR_CHANNEL },
176 { YM_MIDI_MUTE, AD1848_KIND_MUTE, AD1848_AUX2_CHANNEL },
177 { YM_CD_MUTE, AD1848_KIND_MUTE, AD1848_AUX1_CHANNEL },
178 { YM_DAC_MUTE, AD1848_KIND_MUTE, AD1848_DAC_CHANNEL },
179 { YM_LINE_MUTE, AD1848_KIND_MUTE, AD1848_LINE_CHANNEL },
180 { YM_SPEAKER_MUTE, AD1848_KIND_MUTE, AD1848_MONO_CHANNEL },
181 { YM_MONITOR_MUTE, AD1848_KIND_MUTE, AD1848_MONITOR_CHANNEL },
182 { YM_REC_LVL, AD1848_KIND_RECORDGAIN, -1 },
183 { YM_RECORD_SOURCE, AD1848_KIND_RECORDSOURCE, -1}
184 };
185
186 static int nummap = sizeof(mappings) / sizeof(mappings[0]);
187
188
189 static void
190 ym_mute(sc, left_reg, mute)
191 struct ym_softc *sc;
192 int left_reg;
193 int mute;
194
195 {
196 u_char reg;
197
198 if (mute) {
199 reg = ym_read(sc, left_reg);
200 ym_write (sc, left_reg, reg | 0x80);
201 } else {
202 reg = ym_read(sc, left_reg);
203 ym_write (sc, left_reg, reg & ~0x80);
204 }
205 }
206
207 #define MIC_ATTEN_BITS 0x1f
208 #define MASTER_ATTEN_BITS 0x0f
209
210
211 static void
212 ym_set_master_gain(sc, vol)
213 struct ym_softc *sc;
214 struct ad1848_volume *vol;
215 {
216 u_char reg;
217 u_int atten;
218
219 sc->master_gain = *vol;
220
221 atten = ((AUDIO_MAX_GAIN - vol->left) * MASTER_ATTEN_BITS) /
222 AUDIO_MAX_GAIN;
223
224 reg = ym_read(sc, SA3_LCH);
225
226 reg &= ~(MASTER_ATTEN_BITS);
227 reg |= atten;
228
229 ym_write (sc, SA3_LCH, reg);
230
231 atten = ((AUDIO_MAX_GAIN - vol->right) * MASTER_ATTEN_BITS) /
232 AUDIO_MAX_GAIN;
233
234 reg = ym_read(sc, SA3_RCH) & ~(MASTER_ATTEN_BITS);
235 reg |= atten;
236
237 ym_write (sc, SA3_RCH, reg);
238 }
239
240 static void
241 ym_set_mic_gain(sc, vol)
242 struct ym_softc *sc;
243 struct ad1848_volume *vol;
244 {
245 u_char reg;
246 u_int atten;
247
248 sc->mic_gain = *vol;
249
250 atten = ((AUDIO_MAX_GAIN - vol->left) * MIC_ATTEN_BITS)/AUDIO_MAX_GAIN;
251
252 reg = ym_read(sc, SA3_MIC) & ~(MIC_ATTEN_BITS);
253 reg |= atten;
254
255 ym_write (sc, SA3_MIC, reg);
256 }
257
258 int
259 ym_mixer_set_port(addr, cp)
260 void *addr;
261 mixer_ctrl_t *cp;
262 {
263 struct ad1848_softc *ac = addr;
264 struct ym_softc *sc = ac->parent;
265 struct ad1848_volume vol;
266 int error = ad1848_mixer_set_port(ac, mappings, nummap, cp);
267
268 if (error != ENXIO)
269 return (error);
270
271 error = 0;
272
273 switch (cp->dev) {
274 case YM_OUTPUT_LVL:
275 ad1848_to_vol(cp, &vol);
276 ym_set_master_gain(sc, &vol);
277 break;
278
279 case YM_OUTPUT_MUTE:
280 sc->master_mute = (cp->un.ord != 0);
281 ym_mute(sc, SA3_LCH, sc->master_mute);
282 ym_mute(sc, SA3_RCH, sc->master_mute);
283 break;
284
285 case YM_MIC_LVL:
286 if (cp->un.value.num_channels != 1)
287 error = EINVAL;
288
289 ad1848_to_vol(cp, &vol);
290 ym_set_mic_gain(sc, &vol);
291 break;
292
293 case YM_MIC_MUTE:
294 sc->mic_mute = (cp->un.ord != 0);
295 ym_mute(sc, SA3_MIC, sc->mic_mute);
296 break;
297
298 default:
299 return ENXIO;
300 /*NOTREACHED*/
301 }
302
303 return (error);
304 }
305
306 int
307 ym_mixer_get_port(addr, cp)
308 void *addr;
309 mixer_ctrl_t *cp;
310 {
311 struct ad1848_softc *ac = addr;
312 struct ym_softc *sc = ac->parent;
313
314 int error = ad1848_mixer_get_port(ac, mappings, nummap, cp);
315
316 if (error != ENXIO)
317 return (error);
318
319 error = 0;
320
321 switch (cp->dev) {
322 case YM_OUTPUT_LVL:
323 ad1848_from_vol(cp, &sc->master_gain);
324 break;
325
326 case YM_OUTPUT_MUTE:
327 cp->un.ord = sc->master_mute;
328 break;
329
330 case YM_MIC_LVL:
331 if (cp->un.value.num_channels != 1)
332 error = EINVAL;
333 ad1848_from_vol(cp, &sc->mic_gain);
334 break;
335
336 case YM_MIC_MUTE:
337 cp->un.ord = sc->mic_mute;
338 break;
339
340 default:
341 error = ENXIO;
342 break;
343 }
344
345 return(error);
346 }
347
348 static char *mixer_classes[] =
349 { AudioCinputs, AudioCrecord, AudioCoutputs, AudioCmonitor };
350
351 int
352 ym_query_devinfo(addr, dip)
353 void *addr;
354 mixer_devinfo_t *dip;
355 {
356 static char *mixer_port_names[] =
357 { AudioNmidi, AudioNcd, AudioNdac, AudioNline, AudioNspeaker,
358 AudioNmicrophone, AudioNmonitor};
359
360 dip->next = dip->prev = AUDIO_MIXER_LAST;
361
362 switch(dip->index) {
363 case YM_INPUT_CLASS: /* input class descriptor */
364 case YM_OUTPUT_CLASS:
365 case YM_MONITOR_CLASS:
366 case YM_RECORD_CLASS:
367 dip->type = AUDIO_MIXER_CLASS;
368 dip->mixer_class = dip->index;
369 strcpy(dip->label.name,
370 mixer_classes[dip->index - YM_INPUT_CLASS]);
371 break;
372
373 case YM_MIDI_LVL:
374 case YM_CD_LVL:
375 case YM_DAC_LVL:
376 case YM_LINE_LVL:
377 case YM_SPEAKER_LVL:
378 case YM_MIC_LVL:
379 case YM_MONITOR_LVL:
380 dip->type = AUDIO_MIXER_VALUE;
381 if (dip->index == YM_MONITOR_LVL)
382 dip->mixer_class = YM_MONITOR_CLASS;
383 else
384 dip->mixer_class = YM_INPUT_CLASS;
385
386 dip->next = dip->index + 7;
387
388 strcpy(dip->label.name,
389 mixer_port_names[dip->index - YM_MIDI_LVL]);
390
391 if (dip->index == YM_SPEAKER_LVL ||
392 dip->index == YM_MIC_LVL)
393 dip->un.v.num_channels = 1;
394 else
395 dip->un.v.num_channels = 2;
396
397 strcpy(dip->un.v.units.name, AudioNvolume);
398 break;
399
400 case YM_MIDI_MUTE:
401 case YM_CD_MUTE:
402 case YM_DAC_MUTE:
403 case YM_LINE_MUTE:
404 case YM_SPEAKER_MUTE:
405 case YM_MIC_MUTE:
406 case YM_MONITOR_MUTE:
407 if (dip->index == YM_MONITOR_MUTE)
408 dip->mixer_class = YM_MONITOR_CLASS;
409 else
410 dip->mixer_class = YM_INPUT_CLASS;
411 dip->type = AUDIO_MIXER_ENUM;
412 dip->prev = dip->index - 7;
413 mute:
414 strcpy(dip->label.name, AudioNmute);
415 dip->un.e.num_mem = 2;
416 strcpy(dip->un.e.member[0].label.name, AudioNoff);
417 dip->un.e.member[0].ord = 0;
418 strcpy(dip->un.e.member[1].label.name, AudioNon);
419 dip->un.e.member[1].ord = 1;
420 break;
421
422
423 case YM_OUTPUT_LVL:
424 dip->type = AUDIO_MIXER_VALUE;
425 dip->mixer_class = YM_OUTPUT_CLASS;
426 dip->next = YM_OUTPUT_MUTE;
427 strcpy(dip->label.name, AudioNmaster);
428 dip->un.v.num_channels = 2;
429 strcpy(dip->un.v.units.name, AudioNvolume);
430 break;
431
432 case YM_OUTPUT_MUTE:
433 dip->mixer_class = YM_OUTPUT_CLASS;
434 dip->type = AUDIO_MIXER_ENUM;
435 dip->prev = YM_OUTPUT_LVL;
436 goto mute;
437
438 case YM_REC_LVL: /* record level */
439 dip->type = AUDIO_MIXER_VALUE;
440 dip->mixer_class = YM_RECORD_CLASS;
441 dip->next = YM_RECORD_SOURCE;
442 strcpy(dip->label.name, AudioNrecord);
443 dip->un.v.num_channels = 2;
444 strcpy(dip->un.v.units.name, AudioNvolume);
445 break;
446
447
448 case YM_RECORD_SOURCE:
449 dip->mixer_class = YM_RECORD_CLASS;
450 dip->type = AUDIO_MIXER_ENUM;
451 dip->prev = YM_REC_LVL;
452 strcpy(dip->label.name, AudioNsource);
453 dip->un.e.num_mem = 4;
454 strcpy(dip->un.e.member[0].label.name, AudioNmicrophone);
455 dip->un.e.member[0].ord = MIC_IN_PORT;
456 strcpy(dip->un.e.member[1].label.name, AudioNline);
457 dip->un.e.member[1].ord = LINE_IN_PORT;
458 strcpy(dip->un.e.member[2].label.name, AudioNdac);
459 dip->un.e.member[2].ord = DAC_IN_PORT;
460 strcpy(dip->un.e.member[3].label.name, AudioNcd);
461 dip->un.e.member[3].ord = AUX1_IN_PORT;
462 break;
463
464 default:
465 return ENXIO;
466 /*NOTREACHED*/
467 }
468
469 return 0;
470 }
471