ym.c revision 1.35.12.1 1 /* $NetBSD: ym.c,v 1.35.12.1 2008/12/11 19:49:30 ad Exp $ */
2
3 /*-
4 * Copyright (c) 1999-2002, 2007 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by ITOH Yasufumi.
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. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 /*
33 * Copyright (c) 1998 Constantine Sapuntzakis. All rights reserved.
34 *
35 * Redistribution and use in source and binary forms, with or without
36 * modification, are permitted provided that the following conditions
37 * are met:
38 * 1. Redistributions of source code must retain the above copyright
39 * notice, this list of conditions and the following disclaimer.
40 * 2. Redistributions in binary form must reproduce the above copyright
41 * notice, this list of conditions and the following disclaimer in the
42 * documentation and/or other materials provided with the distribution.
43 * 3. The name of the author may not be used to endorse or promote products
44 * derived from this software without specific prior written permission.
45 *
46 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
47 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
48 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
49 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
50 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
51 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
52 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
53 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
54 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
55 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
56 */
57
58 /*
59 * Original code from OpenBSD.
60 */
61
62 #include <sys/cdefs.h>
63 __KERNEL_RCSID(0, "$NetBSD: ym.c,v 1.35.12.1 2008/12/11 19:49:30 ad Exp $");
64
65 #include "mpu_ym.h"
66 #include "opt_ym.h"
67
68 #include <sys/param.h>
69 #include <sys/systm.h>
70 #include <sys/errno.h>
71 #include <sys/device.h>
72 #include <sys/fcntl.h>
73 #include <sys/kernel.h>
74 #include <sys/proc.h>
75
76 #include <sys/cpu.h>
77 #include <sys/intr.h>
78 #include <sys/bus.h>
79
80 #include <sys/audioio.h>
81 #include <dev/audio_if.h>
82
83 #include <dev/isa/isavar.h>
84 #include <dev/isa/isadmavar.h>
85
86 #include <dev/ic/ad1848reg.h>
87 #include <dev/isa/ad1848var.h>
88 #include <dev/ic/opl3sa3reg.h>
89 #include <dev/isa/wssreg.h>
90 #if NMPU_YM > 0
91 #include <dev/ic/mpuvar.h>
92 #endif
93 #include <dev/isa/ymvar.h>
94 #include <dev/isa/sbreg.h>
95
96 /* Power management mode. */
97 #ifndef YM_POWER_MODE
98 #define YM_POWER_MODE YM_POWER_POWERSAVE
99 #endif
100
101 /* Time in second before power down the chip. */
102 #ifndef YM_POWER_OFF_SEC
103 #define YM_POWER_OFF_SEC 5
104 #endif
105
106 /* Default mixer settings. */
107 #ifndef YM_VOL_MASTER
108 #define YM_VOL_MASTER 208
109 #endif
110
111 #ifndef YM_VOL_DAC
112 #define YM_VOL_DAC 224
113 #endif
114
115 #ifndef YM_VOL_OPL3
116 #define YM_VOL_OPL3 184
117 #endif
118
119 /*
120 * Default position of the equalizer.
121 */
122 #ifndef YM_DEFAULT_TREBLE
123 #define YM_DEFAULT_TREBLE YM_EQ_FLAT_OFFSET
124 #endif
125 #ifndef YM_DEFAULT_BASS
126 #define YM_DEFAULT_BASS YM_EQ_FLAT_OFFSET
127 #endif
128
129 #ifdef __i386__ /* XXX */
130 # include "joy.h"
131 #else
132 # define NJOY 0
133 #endif
134
135 #ifdef AUDIO_DEBUG
136 #define DPRINTF(x) if (ymdebug) printf x
137 int ymdebug = 0;
138 #else
139 #define DPRINTF(x)
140 #endif
141 #define DVNAME(softc) (device_xname(&(softc)->sc_ad1848.sc_ad1848.sc_dev))
142
143 int ym_getdev(void *, struct audio_device *);
144 int ym_mixer_set_port(void *, mixer_ctrl_t *);
145 int ym_mixer_get_port(void *, mixer_ctrl_t *);
146 int ym_query_devinfo(void *, mixer_devinfo_t *);
147 int ym_intr(void *);
148 #ifndef AUDIO_NO_POWER_CTL
149 static void ym_save_codec_regs(struct ym_softc *);
150 static void ym_restore_codec_regs(struct ym_softc *);
151 void ym_power_hook(int, void *);
152 int ym_codec_power_ctl(void *, int);
153 static void ym_chip_powerdown(struct ym_softc *);
154 static void ym_chip_powerup(struct ym_softc *, int);
155 void ym_powerdown_blocks(void *);
156 void ym_power_ctl(struct ym_softc *, int, int);
157 #endif
158
159 static void ym_init(struct ym_softc *);
160 static void ym_mute(struct ym_softc *, int, int);
161 static void ym_set_master_gain(struct ym_softc *, struct ad1848_volume*);
162 static void ym_hvol_to_master_gain(struct ym_softc *);
163 static void ym_set_mic_gain(struct ym_softc *, int);
164 static void ym_set_3d(struct ym_softc *, mixer_ctrl_t *,
165 struct ad1848_volume *, int);
166
167
168 const struct audio_hw_if ym_hw_if = {
169 ad1848_isa_open,
170 ad1848_isa_close,
171 NULL,
172 ad1848_query_encoding,
173 ad1848_set_params,
174 ad1848_round_blocksize,
175 ad1848_commit_settings,
176 NULL,
177 NULL,
178 NULL,
179 NULL,
180 ad1848_isa_halt_output,
181 ad1848_isa_halt_input,
182 NULL,
183 ym_getdev,
184 NULL,
185 ym_mixer_set_port,
186 ym_mixer_get_port,
187 ym_query_devinfo,
188 ad1848_isa_malloc,
189 ad1848_isa_free,
190 ad1848_isa_round_buffersize,
191 ad1848_isa_mappage,
192 ad1848_isa_get_props,
193 ad1848_isa_trigger_output,
194 ad1848_isa_trigger_input,
195 NULL,
196 NULL, /* powerstate */
197 ad1848_get_locks,
198 };
199
200 static inline int ym_read(struct ym_softc *, int);
201 static inline void ym_write(struct ym_softc *, int, int);
202
203 void
204 ym_attach(struct ym_softc *sc)
205 {
206 static struct ad1848_volume vol_master = {YM_VOL_MASTER, YM_VOL_MASTER};
207 static struct ad1848_volume vol_dac = {YM_VOL_DAC, YM_VOL_DAC};
208 static struct ad1848_volume vol_opl3 = {YM_VOL_OPL3, YM_VOL_OPL3};
209 struct ad1848_softc *ac;
210 mixer_ctrl_t mctl;
211 struct audio_attach_args arg;
212
213 ac = &sc->sc_ad1848.sc_ad1848;
214 callout_init(&sc->sc_powerdown_ch, 0);
215
216 /* Mute the output to reduce noise during initialization. */
217 ym_mute(sc, SA3_VOL_L, 1);
218 ym_mute(sc, SA3_VOL_R, 1);
219
220 sc->sc_version = ym_read(sc, SA3_MISC) & SA3_MISC_VER;
221 ac->chip_name = YM_IS_SA3(sc) ? "OPL3-SA3" : "OPL3-SA2";
222
223 sc->sc_ad1848.sc_ih = isa_intr_establish(sc->sc_ic, sc->ym_irq,
224 IST_EDGE, IPL_AUDIO, ym_intr, sc);
225
226 #ifndef AUDIO_NO_POWER_CTL
227 sc->sc_ad1848.powerctl = ym_codec_power_ctl;
228 sc->sc_ad1848.powerarg = sc;
229 #endif
230 ad1848_isa_attach(&sc->sc_ad1848);
231 printf("\n");
232 ac->parent = sc;
233
234 /* Establish chip in well known mode */
235 ym_set_master_gain(sc, &vol_master);
236 ym_set_mic_gain(sc, 0);
237 sc->master_mute = 0;
238
239 /* Override ad1848 settings. */
240 ad1848_set_channel_gain(ac, AD1848_DAC_CHANNEL, &vol_dac);
241 ad1848_set_channel_gain(ac, AD1848_AUX2_CHANNEL, &vol_opl3);
242
243 /*
244 * Mute all external sources. If you change this, you must
245 * also change the initial value of sc->sc_external_sources
246 * (currently 0 --- no external source is active).
247 */
248 sc->mic_mute = 1;
249 ym_mute(sc, SA3_MIC_VOL, sc->mic_mute);
250 ad1848_mute_channel(ac, AD1848_AUX1_CHANNEL, MUTE_ALL); /* CD */
251 ad1848_mute_channel(ac, AD1848_LINE_CHANNEL, MUTE_ALL); /* line */
252 ac->mute[AD1848_AUX1_CHANNEL] = MUTE_ALL;
253 ac->mute[AD1848_LINE_CHANNEL] = MUTE_ALL;
254 /* speaker is muted by default */
255
256 /* We use only one IRQ (IRQ-A). */
257 ym_write(sc, SA3_IRQ_CONF, SA3_IRQ_CONF_MPU_A | SA3_IRQ_CONF_WSS_A);
258 ym_write(sc, SA3_HVOL_INTR_CNF, SA3_HVOL_INTR_CNF_A);
259
260 /* audio at ym attachment */
261 sc->sc_audiodev = audio_attach_mi(&ym_hw_if, ac, &ac->sc_dev);
262
263 /* opl at ym attachment */
264 if (sc->sc_opl_ioh) {
265 arg.type = AUDIODEV_TYPE_OPL;
266 arg.hwif = 0;
267 arg.hdl = 0;
268 (void)config_found(&ac->sc_dev, &arg, audioprint);
269 }
270
271 #if NMPU_YM > 0
272 /* mpu at ym attachment */
273 if (sc->sc_mpu_ioh) {
274 arg.type = AUDIODEV_TYPE_MPU;
275 arg.hwif = 0;
276 arg.hdl = 0;
277 sc->sc_mpudev = config_found(&ac->sc_dev, &arg, audioprint);
278 }
279 #endif
280
281 /* This must be AFTER the attachment of sub-devices. */
282 ym_init(sc);
283
284 #ifndef AUDIO_NO_POWER_CTL
285 /*
286 * Initialize power control.
287 */
288 sc->sc_pow_mode = YM_POWER_MODE;
289 sc->sc_pow_timeout = YM_POWER_OFF_SEC;
290
291 sc->sc_on_blocks = sc->sc_turning_off =
292 YM_POWER_CODEC_P | YM_POWER_CODEC_R |
293 YM_POWER_OPL3 | YM_POWER_MPU401 | YM_POWER_3D |
294 YM_POWER_CODEC_DA | YM_POWER_CODEC_AD | YM_POWER_OPL3_DA;
295 #if NJOY > 0
296 sc->sc_on_blocks |= YM_POWER_JOYSTICK; /* prevents chip powerdown */
297 #endif
298 ym_powerdown_blocks(sc);
299
300 powerhook_establish(DVNAME(sc), ym_power_hook, sc);
301 #endif
302
303 /* Set tone control to the default position. */
304 mctl.un.value.num_channels = 1;
305 mctl.un.value.level[AUDIO_MIXER_LEVEL_MONO] = YM_DEFAULT_TREBLE;
306 mctl.dev = YM_MASTER_TREBLE;
307 ym_mixer_set_port(sc, &mctl);
308 mctl.un.value.level[AUDIO_MIXER_LEVEL_MONO] = YM_DEFAULT_BASS;
309 mctl.dev = YM_MASTER_BASS;
310 ym_mixer_set_port(sc, &mctl);
311
312 /* Unmute the output now if the chip is on. */
313 #ifndef AUDIO_NO_POWER_CTL
314 if (sc->sc_on_blocks & YM_POWER_ACTIVE)
315 #endif
316 {
317 ym_mute(sc, SA3_VOL_L, sc->master_mute);
318 ym_mute(sc, SA3_VOL_R, sc->master_mute);
319 }
320 }
321
322 static inline int
323 ym_read(struct ym_softc *sc, int reg)
324 {
325
326 bus_space_write_1(sc->sc_iot, sc->sc_controlioh,
327 SA3_CTL_INDEX, (reg & 0xff));
328 return bus_space_read_1(sc->sc_iot, sc->sc_controlioh, SA3_CTL_DATA);
329 }
330
331 static inline void
332 ym_write(struct ym_softc *sc, int reg, int data)
333 {
334
335 bus_space_write_1(sc->sc_iot, sc->sc_controlioh,
336 SA3_CTL_INDEX, (reg & 0xff));
337 bus_space_write_1(sc->sc_iot, sc->sc_controlioh,
338 SA3_CTL_DATA, (data & 0xff));
339 }
340
341 static void
342 ym_init(struct ym_softc *sc)
343 {
344 uint8_t dpd, apd;
345
346 /* Mute SoundBlaster output if possible. */
347 if (sc->sc_sb_ioh) {
348 bus_space_write_1(sc->sc_iot, sc->sc_sb_ioh, SBP_MIXER_ADDR,
349 SBP_MASTER_VOL);
350 bus_space_write_1(sc->sc_iot, sc->sc_sb_ioh, SBP_MIXER_DATA,
351 0x00);
352 }
353
354 if (!YM_IS_SA3(sc)) {
355 /* OPL3-SA2 */
356 ym_write(sc, SA3_PWR_MNG, SA2_PWR_MNG_CLKO |
357 (sc->sc_opl_ioh == 0 ? SA2_PWR_MNG_FMPS : 0));
358 return;
359 }
360
361 /* OPL3-SA3 */
362 /* Figure out which part can be power down. */
363 dpd = SA3_DPWRDWN_SB /* we never use SB */
364 #if NMPU_YM > 0
365 | (sc->sc_mpu_ioh ? 0 : SA3_DPWRDWN_MPU)
366 #else
367 | SA3_DPWRDWN_MPU
368 #endif
369 #if NJOY == 0
370 | SA3_DPWRDWN_JOY
371 #endif
372 | SA3_DPWRDWN_PNP /* ISA Plug and Play is done */
373 /*
374 * The master clock is for external wavetable synthesizer
375 * OPL4-ML (YMF704) or OPL4-ML2 (YMF721),
376 * and is currently unused.
377 */
378 | SA3_DPWRDWN_MCLKO;
379
380 apd = SA3_APWRDWN_SBDAC; /* we never use SB */
381
382 /* Power down OPL3 if not attached. */
383 if (sc->sc_opl_ioh == 0) {
384 dpd |= SA3_DPWRDWN_FM;
385 apd |= SA3_APWRDWN_FMDAC;
386 }
387 /* CODEC is always attached. */
388
389 /* Power down unused digital parts. */
390 ym_write(sc, SA3_DPWRDWN, dpd);
391
392 /* Power down unused analog parts. */
393 ym_write(sc, SA3_APWRDWN, apd);
394 }
395
396
397 int
398 ym_getdev(void *addr, struct audio_device *retp)
399 {
400 struct ym_softc *sc;
401 struct ad1848_softc *ac;
402
403 sc = addr;
404 ac = &sc->sc_ad1848.sc_ad1848;
405 strlcpy(retp->name, ac->chip_name, sizeof(retp->name));
406 snprintf(retp->version, sizeof(retp->version), "%d", sc->sc_version);
407 strlcpy(retp->config, "ym", sizeof(retp->config));
408
409 return 0;
410 }
411
412
413 static ad1848_devmap_t mappings[] = {
414 { YM_DAC_LVL, AD1848_KIND_LVL, AD1848_DAC_CHANNEL },
415 { YM_MIDI_LVL, AD1848_KIND_LVL, AD1848_AUX2_CHANNEL },
416 { YM_CD_LVL, AD1848_KIND_LVL, AD1848_AUX1_CHANNEL },
417 { YM_LINE_LVL, AD1848_KIND_LVL, AD1848_LINE_CHANNEL },
418 { YM_SPEAKER_LVL, AD1848_KIND_LVL, AD1848_MONO_CHANNEL },
419 { YM_MONITOR_LVL, AD1848_KIND_LVL, AD1848_MONITOR_CHANNEL },
420 { YM_DAC_MUTE, AD1848_KIND_MUTE, AD1848_DAC_CHANNEL },
421 { YM_MIDI_MUTE, AD1848_KIND_MUTE, AD1848_AUX2_CHANNEL },
422 { YM_CD_MUTE, AD1848_KIND_MUTE, AD1848_AUX1_CHANNEL },
423 { YM_LINE_MUTE, AD1848_KIND_MUTE, AD1848_LINE_CHANNEL },
424 { YM_SPEAKER_MUTE, AD1848_KIND_MUTE, AD1848_MONO_CHANNEL },
425 { YM_MONITOR_MUTE, AD1848_KIND_MUTE, AD1848_MONITOR_CHANNEL },
426 { YM_REC_LVL, AD1848_KIND_RECORDGAIN, -1 },
427 { YM_RECORD_SOURCE, AD1848_KIND_RECORDSOURCE, -1}
428 };
429
430 #define NUMMAP (sizeof(mappings) / sizeof(mappings[0]))
431
432
433 static void
434 ym_mute(struct ym_softc *sc, int left_reg, int mute)
435 {
436 uint8_t reg;
437
438 reg = ym_read(sc, left_reg);
439 if (mute)
440 ym_write(sc, left_reg, reg | 0x80);
441 else
442 ym_write(sc, left_reg, reg & ~0x80);
443 }
444
445
446 static void
447 ym_set_master_gain(struct ym_softc *sc, struct ad1848_volume *vol)
448 {
449 u_int atten;
450
451 sc->master_gain = *vol;
452
453 atten = ((AUDIO_MAX_GAIN - vol->left) * (SA3_VOL_MV + 1)) /
454 (AUDIO_MAX_GAIN + 1);
455
456 ym_write(sc, SA3_VOL_L, (ym_read(sc, SA3_VOL_L) & ~SA3_VOL_MV) | atten);
457
458 atten = ((AUDIO_MAX_GAIN - vol->right) * (SA3_VOL_MV + 1)) /
459 (AUDIO_MAX_GAIN + 1);
460
461 ym_write(sc, SA3_VOL_R, (ym_read(sc, SA3_VOL_R) & ~SA3_VOL_MV) | atten);
462 }
463
464 /*
465 * Read current setting of master volume from hardware
466 * and update the software value if changed.
467 * [SA3] This function clears hardware volume interrupt.
468 */
469 static void
470 ym_hvol_to_master_gain(struct ym_softc *sc)
471 {
472 u_int prevval, val;
473 int changed;
474
475 changed = 0;
476 val = SA3_VOL_MV & ~ym_read(sc, SA3_VOL_L);
477 prevval = (sc->master_gain.left * (SA3_VOL_MV + 1)) /
478 (AUDIO_MAX_GAIN + 1);
479 if (val != prevval) {
480 sc->master_gain.left =
481 val * ((AUDIO_MAX_GAIN + 1) / (SA3_VOL_MV + 1));
482 changed = 1;
483 }
484
485 val = SA3_VOL_MV & ~ym_read(sc, SA3_VOL_R);
486 prevval = (sc->master_gain.right * (SA3_VOL_MV + 1)) /
487 (AUDIO_MAX_GAIN + 1);
488 if (val != prevval) {
489 sc->master_gain.right =
490 val * ((AUDIO_MAX_GAIN + 1) / (SA3_VOL_MV + 1));
491 changed = 1;
492 }
493
494 #if 0 /* XXX NOT YET */
495 /* Notify the change to async processes. */
496 if (changed && sc->sc_audiodev)
497 mixer_signal(sc->sc_audiodev);
498 #endif
499 }
500
501 static void
502 ym_set_mic_gain(struct ym_softc *sc, int vol)
503 {
504 u_int atten;
505
506 sc->mic_gain = vol;
507
508 atten = ((AUDIO_MAX_GAIN - vol) * (SA3_MIC_MCV + 1)) /
509 (AUDIO_MAX_GAIN + 1);
510
511 ym_write(sc, SA3_MIC_VOL,
512 (ym_read(sc, SA3_MIC_VOL) & ~SA3_MIC_MCV) | atten);
513 }
514
515 static void
516 ym_set_3d(struct ym_softc *sc, mixer_ctrl_t *cp,
517 struct ad1848_volume *val, int reg)
518 {
519 uint8_t l, r, e;
520
521 ad1848_to_vol(cp, val);
522
523 l = val->left;
524 r = val->right;
525 if (reg != SA3_3D_WIDE) {
526 /* flat on center */
527 l = YM_EQ_EXPAND_VALUE(l);
528 r = YM_EQ_EXPAND_VALUE(r);
529 }
530
531 e = (l * (SA3_3D_BITS + 1) + (SA3_3D_BITS + 1) / 2) /
532 (AUDIO_MAX_GAIN + 1) << SA3_3D_LSHIFT |
533 (r * (SA3_3D_BITS + 1) + (SA3_3D_BITS + 1) / 2) /
534 (AUDIO_MAX_GAIN + 1) << SA3_3D_RSHIFT;
535
536 #ifndef AUDIO_NO_POWER_CTL
537 /* turn wide stereo on if necessary */
538 if (e)
539 ym_power_ctl(sc, YM_POWER_3D, 1);
540 #endif
541
542 ym_write(sc, reg, e);
543
544 #ifndef AUDIO_NO_POWER_CTL
545 /* turn wide stereo off if necessary */
546 if (YM_EQ_OFF(&sc->sc_treble) && YM_EQ_OFF(&sc->sc_bass) &&
547 YM_WIDE_OFF(&sc->sc_wide))
548 ym_power_ctl(sc, YM_POWER_3D, 0);
549 #endif
550 }
551
552 int
553 ym_mixer_set_port(void *addr, mixer_ctrl_t *cp)
554 {
555 struct ad1848_softc *ac;
556 struct ym_softc *sc;
557 struct ad1848_volume vol;
558 int error;
559 uint8_t extsources;
560
561 ac = addr;
562 sc = ac->parent;
563 error = 0;
564 DPRINTF(("%s: ym_mixer_set_port: dev 0x%x, type 0x%x, 0x%x (%d; %d, %d)\n",
565 DVNAME(sc), cp->dev, cp->type, cp->un.ord,
566 cp->un.value.num_channels, cp->un.value.level[0],
567 cp->un.value.level[1]));
568
569 /* SA2 doesn't have equalizer */
570 if (!YM_IS_SA3(sc) && YM_MIXER_SA3_ONLY(cp->dev))
571 return ENXIO;
572
573 #ifndef AUDIO_NO_POWER_CTL
574 /* Power-up chip */
575 ym_power_ctl(sc, YM_POWER_CODEC_CTL, 1);
576 #endif
577
578 switch (cp->dev) {
579 case YM_OUTPUT_LVL:
580 ad1848_to_vol(cp, &vol);
581 ym_set_master_gain(sc, &vol);
582 goto out;
583
584 case YM_OUTPUT_MUTE:
585 sc->master_mute = (cp->un.ord != 0);
586 ym_mute(sc, SA3_VOL_L, sc->master_mute);
587 ym_mute(sc, SA3_VOL_R, sc->master_mute);
588 goto out;
589
590 case YM_MIC_LVL:
591 if (cp->un.value.num_channels != 1)
592 error = EINVAL;
593 else
594 ym_set_mic_gain(sc,
595 cp->un.value.level[AUDIO_MIXER_LEVEL_MONO]);
596 goto out;
597
598 case YM_MASTER_EQMODE:
599 sc->sc_eqmode = cp->un.ord & SA3_SYS_CTL_YMODE;
600 ym_write(sc, SA3_SYS_CTL, (ym_read(sc, SA3_SYS_CTL) &
601 ~SA3_SYS_CTL_YMODE) | sc->sc_eqmode);
602 goto out;
603
604 case YM_MASTER_TREBLE:
605 ym_set_3d(sc, cp, &sc->sc_treble, SA3_3D_TREBLE);
606 goto out;
607
608 case YM_MASTER_BASS:
609 ym_set_3d(sc, cp, &sc->sc_bass, SA3_3D_BASS);
610 goto out;
611
612 case YM_MASTER_WIDE:
613 ym_set_3d(sc, cp, &sc->sc_wide, SA3_3D_WIDE);
614 goto out;
615
616 #ifndef AUDIO_NO_POWER_CTL
617 case YM_PWR_MODE:
618 if ((unsigned) cp->un.ord > YM_POWER_NOSAVE)
619 error = EINVAL;
620 else
621 sc->sc_pow_mode = cp->un.ord;
622 goto out;
623
624 case YM_PWR_TIMEOUT:
625 if (cp->un.value.num_channels != 1)
626 error = EINVAL;
627 else
628 sc->sc_pow_timeout =
629 cp->un.value.level[AUDIO_MIXER_LEVEL_MONO];
630 goto out;
631
632 /*
633 * Needs power-up to hear external sources.
634 */
635 case YM_CD_MUTE:
636 case YM_LINE_MUTE:
637 case YM_SPEAKER_MUTE:
638 case YM_MIC_MUTE:
639 extsources = YM_MIXER_TO_XS(cp->dev);
640 if (cp->un.ord) {
641 if ((sc->sc_external_sources &= ~extsources) == 0) {
642 /*
643 * All the external sources are muted
644 * --- no need to keep the chip on.
645 */
646 ym_power_ctl(sc, YM_POWER_EXT_SRC, 0);
647 DPRINTF(("%s: ym_mixer_set_port: off for ext\n",
648 DVNAME(sc)));
649 }
650 } else {
651 /* mute off - power-up the chip */
652 sc->sc_external_sources |= extsources;
653 ym_power_ctl(sc, YM_POWER_EXT_SRC, 1);
654 DPRINTF(("%s: ym_mixer_set_port: on for ext\n",
655 DVNAME(sc)));
656 }
657 break; /* fall to ad1848_mixer_set_port() */
658
659 /*
660 * Power on/off the playback part for monitoring.
661 */
662 case YM_MONITOR_MUTE:
663 if ((ac->open_mode & (FREAD | FWRITE)) == FREAD)
664 ym_power_ctl(sc, YM_POWER_CODEC_P | YM_POWER_CODEC_DA,
665 cp->un.ord == 0);
666 break; /* fall to ad1848_mixer_set_port() */
667 #endif
668 }
669
670 error = ad1848_mixer_set_port(ac, mappings, NUMMAP, cp);
671
672 if (error != ENXIO)
673 goto out;
674
675 error = 0;
676
677 switch (cp->dev) {
678 case YM_MIC_MUTE:
679 sc->mic_mute = (cp->un.ord != 0);
680 ym_mute(sc, SA3_MIC_VOL, sc->mic_mute);
681 break;
682
683 default:
684 error = ENXIO;
685 break;
686 }
687
688 out:
689 #ifndef AUDIO_NO_POWER_CTL
690 /* Power-down chip */
691 ym_power_ctl(sc, YM_POWER_CODEC_CTL, 0);
692 #endif
693
694 return error;
695 }
696
697 int
698 ym_mixer_get_port(void *addr, mixer_ctrl_t *cp)
699 {
700 struct ad1848_softc *ac;
701 struct ym_softc *sc;
702 int error;
703
704 ac = addr;
705 sc = ac->parent;
706 /* SA2 doesn't have equalizer */
707 if (!YM_IS_SA3(sc) && YM_MIXER_SA3_ONLY(cp->dev))
708 return ENXIO;
709
710 switch (cp->dev) {
711 case YM_OUTPUT_LVL:
712 if (!YM_IS_SA3(sc)) {
713 /*
714 * SA2 doesn't have hardware volume interrupt.
715 * Read current value and update every time.
716 */
717 #ifndef AUDIO_NO_POWER_CTL
718 /* Power-up chip */
719 ym_power_ctl(sc, YM_POWER_CODEC_CTL, 1);
720 #endif
721 ym_hvol_to_master_gain(sc);
722 #ifndef AUDIO_NO_POWER_CTL
723 /* Power-down chip */
724 ym_power_ctl(sc, YM_POWER_CODEC_CTL, 0);
725 #endif
726 }
727 ad1848_from_vol(cp, &sc->master_gain);
728 return 0;
729
730 case YM_OUTPUT_MUTE:
731 cp->un.ord = sc->master_mute;
732 return 0;
733
734 case YM_MIC_LVL:
735 if (cp->un.value.num_channels != 1)
736 return EINVAL;
737 cp->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->mic_gain;
738 return 0;
739
740 case YM_MASTER_EQMODE:
741 cp->un.ord = sc->sc_eqmode;
742 return 0;
743
744 case YM_MASTER_TREBLE:
745 ad1848_from_vol(cp, &sc->sc_treble);
746 return 0;
747
748 case YM_MASTER_BASS:
749 ad1848_from_vol(cp, &sc->sc_bass);
750 return 0;
751
752 case YM_MASTER_WIDE:
753 ad1848_from_vol(cp, &sc->sc_wide);
754 return 0;
755
756 #ifndef AUDIO_NO_POWER_CTL
757 case YM_PWR_MODE:
758 cp->un.ord = sc->sc_pow_mode;
759 return 0;
760
761 case YM_PWR_TIMEOUT:
762 if (cp->un.value.num_channels != 1)
763 return EINVAL;
764 cp->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_pow_timeout;
765 return 0;
766 #endif
767 }
768
769 error = ad1848_mixer_get_port(ac, mappings, NUMMAP, cp);
770
771 if (error != ENXIO)
772 return error;
773
774 error = 0;
775
776 switch (cp->dev) {
777 case YM_MIC_MUTE:
778 cp->un.ord = sc->mic_mute;
779 break;
780
781 default:
782 error = ENXIO;
783 break;
784 }
785
786 return error;
787 }
788
789 static const char *mixer_classes[] = {
790 AudioCinputs, AudioCrecord, AudioCoutputs, AudioCmonitor,
791 #ifndef AUDIO_NO_POWER_CTL
792 AudioCpower,
793 #endif
794 AudioCequalization
795 };
796
797 int
798 ym_query_devinfo(void *addr, mixer_devinfo_t *dip)
799 {
800 static const char *mixer_port_names[] = {
801 AudioNdac, AudioNmidi, AudioNcd, AudioNline, AudioNspeaker,
802 AudioNmicrophone, AudioNmonitor
803 };
804 struct ad1848_softc *ac;
805 struct ym_softc *sc;
806
807 ac = addr;
808 sc = ac->parent;
809 /* SA2 doesn't have equalizer */
810 if (!YM_IS_SA3(sc) && YM_MIXER_SA3_ONLY(dip->index))
811 return ENXIO;
812
813 dip->next = dip->prev = AUDIO_MIXER_LAST;
814
815 switch(dip->index) {
816 case YM_INPUT_CLASS:
817 case YM_OUTPUT_CLASS:
818 case YM_MONITOR_CLASS:
819 case YM_RECORD_CLASS:
820 #ifndef AUDIO_NO_POWER_CTL
821 case YM_PWR_CLASS:
822 #endif
823 case YM_EQ_CLASS:
824 dip->type = AUDIO_MIXER_CLASS;
825 dip->mixer_class = dip->index;
826 strcpy(dip->label.name,
827 mixer_classes[dip->index - YM_INPUT_CLASS]);
828 break;
829
830 case YM_DAC_LVL:
831 case YM_MIDI_LVL:
832 case YM_CD_LVL:
833 case YM_LINE_LVL:
834 case YM_SPEAKER_LVL:
835 case YM_MIC_LVL:
836 case YM_MONITOR_LVL:
837 dip->type = AUDIO_MIXER_VALUE;
838 if (dip->index == YM_MONITOR_LVL)
839 dip->mixer_class = YM_MONITOR_CLASS;
840 else
841 dip->mixer_class = YM_INPUT_CLASS;
842
843 dip->next = dip->index + 7;
844
845 strcpy(dip->label.name,
846 mixer_port_names[dip->index - YM_DAC_LVL]);
847
848 if (dip->index == YM_SPEAKER_LVL ||
849 dip->index == YM_MIC_LVL)
850 dip->un.v.num_channels = 1;
851 else
852 dip->un.v.num_channels = 2;
853
854 if (dip->index == YM_SPEAKER_LVL)
855 dip->un.v.delta = 1 << (8 - 4 /* valid bits */);
856 else if (dip->index == YM_DAC_LVL ||
857 dip->index == YM_MONITOR_LVL)
858 dip->un.v.delta = 1 << (8 - 6 /* valid bits */);
859 else
860 dip->un.v.delta = 1 << (8 - 5 /* valid bits */);
861
862 strcpy(dip->un.v.units.name, AudioNvolume);
863 break;
864
865 case YM_DAC_MUTE:
866 case YM_MIDI_MUTE:
867 case YM_CD_MUTE:
868 case YM_LINE_MUTE:
869 case YM_SPEAKER_MUTE:
870 case YM_MIC_MUTE:
871 case YM_MONITOR_MUTE:
872 if (dip->index == YM_MONITOR_MUTE)
873 dip->mixer_class = YM_MONITOR_CLASS;
874 else
875 dip->mixer_class = YM_INPUT_CLASS;
876 dip->type = AUDIO_MIXER_ENUM;
877 dip->prev = dip->index - 7;
878 mute:
879 strcpy(dip->label.name, AudioNmute);
880 dip->un.e.num_mem = 2;
881 strcpy(dip->un.e.member[0].label.name, AudioNoff);
882 dip->un.e.member[0].ord = 0;
883 strcpy(dip->un.e.member[1].label.name, AudioNon);
884 dip->un.e.member[1].ord = 1;
885 break;
886
887
888 case YM_OUTPUT_LVL:
889 dip->type = AUDIO_MIXER_VALUE;
890 dip->mixer_class = YM_OUTPUT_CLASS;
891 dip->next = YM_OUTPUT_MUTE;
892 strcpy(dip->label.name, AudioNmaster);
893 dip->un.v.num_channels = 2;
894 dip->un.v.delta = (AUDIO_MAX_GAIN + 1) / (SA3_VOL_MV + 1);
895 strcpy(dip->un.v.units.name, AudioNvolume);
896 break;
897
898 case YM_OUTPUT_MUTE:
899 dip->mixer_class = YM_OUTPUT_CLASS;
900 dip->type = AUDIO_MIXER_ENUM;
901 dip->prev = YM_OUTPUT_LVL;
902 goto mute;
903
904
905 case YM_REC_LVL: /* record level */
906 dip->type = AUDIO_MIXER_VALUE;
907 dip->mixer_class = YM_RECORD_CLASS;
908 dip->next = YM_RECORD_SOURCE;
909 strcpy(dip->label.name, AudioNrecord);
910 dip->un.v.num_channels = 2;
911 dip->un.v.delta = 1 << (8 - 4 /* valid bits */);
912 strcpy(dip->un.v.units.name, AudioNvolume);
913 break;
914
915 case YM_RECORD_SOURCE:
916 dip->mixer_class = YM_RECORD_CLASS;
917 dip->type = AUDIO_MIXER_ENUM;
918 dip->prev = YM_REC_LVL;
919 strcpy(dip->label.name, AudioNsource);
920 dip->un.e.num_mem = 4;
921 strcpy(dip->un.e.member[0].label.name, AudioNmicrophone);
922 dip->un.e.member[0].ord = MIC_IN_PORT;
923 strcpy(dip->un.e.member[1].label.name, AudioNline);
924 dip->un.e.member[1].ord = LINE_IN_PORT;
925 strcpy(dip->un.e.member[2].label.name, AudioNdac);
926 dip->un.e.member[2].ord = DAC_IN_PORT;
927 strcpy(dip->un.e.member[3].label.name, AudioNcd);
928 dip->un.e.member[3].ord = AUX1_IN_PORT;
929 break;
930
931
932 case YM_MASTER_EQMODE:
933 dip->type = AUDIO_MIXER_ENUM;
934 dip->mixer_class = YM_EQ_CLASS;
935 strcpy(dip->label.name, AudioNmode);
936 strcpy(dip->un.v.units.name, AudioNmode);
937 dip->un.e.num_mem = 4;
938 strcpy(dip->un.e.member[0].label.name, AudioNdesktop);
939 dip->un.e.member[0].ord = SA3_SYS_CTL_YMODE0;
940 strcpy(dip->un.e.member[1].label.name, AudioNlaptop);
941 dip->un.e.member[1].ord = SA3_SYS_CTL_YMODE1;
942 strcpy(dip->un.e.member[2].label.name, AudioNsubnote);
943 dip->un.e.member[2].ord = SA3_SYS_CTL_YMODE2;
944 strcpy(dip->un.e.member[3].label.name, AudioNhifi);
945 dip->un.e.member[3].ord = SA3_SYS_CTL_YMODE3;
946 break;
947
948 case YM_MASTER_TREBLE:
949 dip->type = AUDIO_MIXER_VALUE;
950 dip->mixer_class = YM_EQ_CLASS;
951 strcpy(dip->label.name, AudioNtreble);
952 dip->un.v.num_channels = 2;
953 dip->un.v.delta = (AUDIO_MAX_GAIN + 1) / (SA3_3D_BITS + 1)
954 >> YM_EQ_REDUCE_BIT;
955 strcpy(dip->un.v.units.name, AudioNtreble);
956 break;
957
958 case YM_MASTER_BASS:
959 dip->type = AUDIO_MIXER_VALUE;
960 dip->mixer_class = YM_EQ_CLASS;
961 strcpy(dip->label.name, AudioNbass);
962 dip->un.v.num_channels = 2;
963 dip->un.v.delta = (AUDIO_MAX_GAIN + 1) / (SA3_3D_BITS + 1)
964 >> YM_EQ_REDUCE_BIT;
965 strcpy(dip->un.v.units.name, AudioNbass);
966 break;
967
968 case YM_MASTER_WIDE:
969 dip->type = AUDIO_MIXER_VALUE;
970 dip->mixer_class = YM_EQ_CLASS;
971 strcpy(dip->label.name, AudioNsurround);
972 dip->un.v.num_channels = 2;
973 dip->un.v.delta = (AUDIO_MAX_GAIN + 1) / (SA3_3D_BITS + 1);
974 strcpy(dip->un.v.units.name, AudioNsurround);
975 break;
976
977
978 #ifndef AUDIO_NO_POWER_CTL
979 case YM_PWR_MODE:
980 dip->type = AUDIO_MIXER_ENUM;
981 dip->mixer_class = YM_PWR_CLASS;
982 dip->next = YM_PWR_TIMEOUT;
983 strcpy(dip->label.name, AudioNsave);
984 dip->un.e.num_mem = 3;
985 strcpy(dip->un.e.member[0].label.name, AudioNpowerdown);
986 dip->un.e.member[0].ord = YM_POWER_POWERDOWN;
987 strcpy(dip->un.e.member[1].label.name, AudioNpowersave);
988 dip->un.e.member[1].ord = YM_POWER_POWERSAVE;
989 strcpy(dip->un.e.member[2].label.name, AudioNnosave);
990 dip->un.e.member[2].ord = YM_POWER_NOSAVE;
991 break;
992
993 case YM_PWR_TIMEOUT:
994 dip->type = AUDIO_MIXER_VALUE;
995 dip->mixer_class = YM_PWR_CLASS;
996 dip->prev = YM_PWR_MODE;
997 strcpy(dip->label.name, AudioNtimeout);
998 dip->un.v.num_channels = 1;
999 strcpy(dip->un.v.units.name, AudioNtimeout);
1000 break;
1001 #endif /* not AUDIO_NO_POWER_CTL */
1002
1003 default:
1004 return ENXIO;
1005 /*NOTREACHED*/
1006 }
1007
1008 return 0;
1009 }
1010
1011 int
1012 ym_intr(void *arg)
1013 {
1014 struct ym_softc *sc = arg;
1015 #if NMPU_YM > 0
1016 struct mpu_softc *sc_mpu = device_private(sc->sc_mpudev);
1017 #endif
1018 u_int8_t ist;
1019 int processed;
1020
1021 /* OPL3 timer is currently unused. */
1022 if (((ist = ym_read(sc, SA3_IRQA_STAT)) &
1023 ~(SA3_IRQ_STAT_SB|SA3_IRQ_STAT_OPL3)) == 0) {
1024 DPRINTF(("%s: ym_intr: spurious interrupt\n", DVNAME(sc)));
1025 return 0;
1026 }
1027
1028 /* Process pending interrupts. */
1029 do {
1030 processed = 0;
1031 /*
1032 * CODEC interrupts.
1033 */
1034 if (ist & (SA3_IRQ_STAT_TI|SA3_IRQ_STAT_CI|SA3_IRQ_STAT_PI)) {
1035 ad1848_isa_intr(&sc->sc_ad1848);
1036 processed = 1;
1037 }
1038 #if NMPU_YM > 0
1039 /*
1040 * MPU401 interrupt.
1041 */
1042 if (ist & SA3_IRQ_STAT_MPU) {
1043 mpu_intr(sc_mpu);
1044 processed = 1;
1045 }
1046 #endif
1047 /*
1048 * Hardware volume interrupt (SA3 only).
1049 * Recalculate master volume from the hardware setting.
1050 */
1051 if ((ist & SA3_IRQ_STAT_MV) && YM_IS_SA3(sc)) {
1052 ym_hvol_to_master_gain(sc);
1053 processed = 1;
1054 }
1055 } while (processed && (ist = ym_read(sc, SA3_IRQA_STAT)));
1056
1057 mutex_spin_exit(&sc->sc_ad1848.sc_ad1848.sc_intr_lock);
1058 return 1;
1059 }
1060
1061
1062 #ifndef AUDIO_NO_POWER_CTL
1063 static void
1064 ym_save_codec_regs(struct ym_softc *sc)
1065 {
1066 struct ad1848_softc *ac;
1067 int i;
1068
1069 DPRINTF(("%s: ym_save_codec_regs\n", DVNAME(sc)));
1070 ac = &sc->sc_ad1848.sc_ad1848;
1071 for (i = 0; i <= 0x1f; i++)
1072 sc->sc_codec_scan[i] = ad_read(ac, i);
1073 }
1074
1075 static void
1076 ym_restore_codec_regs(struct ym_softc *sc)
1077 {
1078 struct ad1848_softc *ac;
1079 int i, t;
1080
1081 DPRINTF(("%s: ym_restore_codec_regs\n", DVNAME(sc)));
1082 ac = &sc->sc_ad1848.sc_ad1848;
1083 for (i = 0; i <= 0x1f; i++) {
1084 /*
1085 * Wait til the chip becomes ready.
1086 * This is required after suspend/resume.
1087 */
1088 for (t = 0;
1089 t < 100000 && ADREAD(ac, AD1848_IADDR) & SP_IN_INIT; t++)
1090 ;
1091 #ifdef AUDIO_DEBUG
1092 if (t)
1093 DPRINTF(("%s: ym_restore_codec_regs: reg %d, t %d\n",
1094 DVNAME(sc), i, t));
1095 #endif
1096 ad_write(ac, i, sc->sc_codec_scan[i]);
1097 }
1098 }
1099
1100 /*
1101 * Save and restore the state on suspending / resumning.
1102 *
1103 * XXX This is not complete.
1104 * Currently only the parameters, such as output gain, are restored.
1105 * DMA state should also be restored. FIXME.
1106 */
1107 void
1108 ym_power_hook(int why, void *v)
1109 {
1110 struct ym_softc *sc;
1111 int i, xmax;
1112
1113 sc = v;
1114 DPRINTF(("%s: ym_power_hook: why = %d\n", DVNAME(sc), why));
1115
1116 mutex_spin_enter(&sc->sc_ad1848.sc_ad1848.sc_intr_lock);
1117
1118 switch (why) {
1119 case PWR_SUSPEND:
1120 case PWR_STANDBY:
1121 /*
1122 * suspending...
1123 */
1124 callout_stop(&sc->sc_powerdown_ch);
1125 if (sc->sc_turning_off)
1126 ym_powerdown_blocks(sc);
1127
1128 /*
1129 * Save CODEC registers.
1130 * Note that the registers read incorrect
1131 * if the CODEC part is in power-down mode.
1132 */
1133 if (sc->sc_on_blocks & YM_POWER_CODEC_DIGITAL)
1134 ym_save_codec_regs(sc);
1135
1136 /*
1137 * Save OPL3-SA3 control registers and power-down the chip.
1138 * Note that the registers read incorrect
1139 * if the chip is in global power-down mode.
1140 */
1141 sc->sc_sa3_scan[SA3_PWR_MNG] = ym_read(sc, SA3_PWR_MNG);
1142 if (sc->sc_on_blocks)
1143 ym_chip_powerdown(sc);
1144 break;
1145
1146 case PWR_RESUME:
1147 /*
1148 * resuming...
1149 */
1150 ym_chip_powerup(sc, 1);
1151 ym_init(sc); /* power-on CODEC */
1152
1153 /* Restore control registers. */
1154 xmax = YM_IS_SA3(sc)? YM_SAVE_REG_MAX_SA3 : YM_SAVE_REG_MAX_SA2;
1155 for (i = SA3_PWR_MNG + 1; i <= xmax; i++) {
1156 if (i == SA3_SB_SCAN || i == SA3_SB_SCAN_DATA ||
1157 i == SA3_DPWRDWN)
1158 continue;
1159 ym_write(sc, i, sc->sc_sa3_scan[i]);
1160 }
1161
1162 /* Restore CODEC registers (including mixer). */
1163 ym_restore_codec_regs(sc);
1164
1165 /* Restore global/digital power-down state. */
1166 ym_write(sc, SA3_PWR_MNG, sc->sc_sa3_scan[SA3_PWR_MNG]);
1167 if (YM_IS_SA3(sc))
1168 ym_write(sc, SA3_DPWRDWN, sc->sc_sa3_scan[SA3_DPWRDWN]);
1169 break;
1170 case PWR_SOFTSUSPEND:
1171 case PWR_SOFTSTANDBY:
1172 case PWR_SOFTRESUME:
1173 break;
1174 }
1175 mutex_spin_exit(&sc->sc_ad1848.sc_ad1848.sc_intr_lock);
1176 }
1177
1178 int
1179 ym_codec_power_ctl(void *arg, int flags)
1180 {
1181 struct ym_softc *sc;
1182 struct ad1848_softc *ac;
1183 int parts;
1184
1185 sc = arg;
1186 ac = &sc->sc_ad1848.sc_ad1848;
1187 DPRINTF(("%s: ym_codec_power_ctl: flags = 0x%x\n", DVNAME(sc), flags));
1188
1189 if (flags != 0) {
1190 parts = 0;
1191 if (flags & FREAD) {
1192 parts |= YM_POWER_CODEC_R | YM_POWER_CODEC_AD;
1193 if (ac->mute[AD1848_MONITOR_CHANNEL] == 0)
1194 parts |= YM_POWER_CODEC_P | YM_POWER_CODEC_DA;
1195 }
1196 if (flags & FWRITE)
1197 parts |= YM_POWER_CODEC_P | YM_POWER_CODEC_DA;
1198 } else
1199 parts = YM_POWER_CODEC_P | YM_POWER_CODEC_R |
1200 YM_POWER_CODEC_DA | YM_POWER_CODEC_AD;
1201
1202 ym_power_ctl(sc, parts, flags);
1203
1204 return 0;
1205 }
1206
1207 /*
1208 * Enter Power Save mode or Global Power Down mode.
1209 * Total dissipation becomes 5mA and 10uA (typ.) respective.
1210 *
1211 * This must be called at splaudio().
1212 */
1213 static void
1214 ym_chip_powerdown(struct ym_softc *sc)
1215 {
1216 int i, xmax;
1217
1218 DPRINTF(("%s: ym_chip_powerdown\n", DVNAME(sc)));
1219
1220 xmax = YM_IS_SA3(sc) ? YM_SAVE_REG_MAX_SA3 : YM_SAVE_REG_MAX_SA2;
1221
1222 /* Save control registers. */
1223 for (i = SA3_PWR_MNG + 1; i <= xmax; i++) {
1224 if (i == SA3_SB_SCAN || i == SA3_SB_SCAN_DATA)
1225 continue;
1226 sc->sc_sa3_scan[i] = ym_read(sc, i);
1227 }
1228 ym_write(sc, SA3_PWR_MNG,
1229 (sc->sc_pow_mode == YM_POWER_POWERDOWN ?
1230 SA3_PWR_MNG_PDN : SA3_PWR_MNG_PSV) | SA3_PWR_MNG_PDX);
1231 }
1232
1233 /*
1234 * Power up from Power Save / Global Power Down Mode.
1235 *
1236 * We assume no ym interrupt shall occur, since the chip is
1237 * in power-down mode (or should be blocked by splaudio()).
1238 */
1239 static void
1240 ym_chip_powerup(struct ym_softc *sc, int nosleep)
1241 {
1242 int wchan;
1243 uint8_t pw;
1244
1245 DPRINTF(("%s: ym_chip_powerup\n", DVNAME(sc)));
1246
1247 pw = ym_read(sc, SA3_PWR_MNG);
1248
1249 if ((pw & (SA3_PWR_MNG_PSV | SA3_PWR_MNG_PDN | SA3_PWR_MNG_PDX)) == 0)
1250 return; /* already on */
1251
1252 pw &= ~SA3_PWR_MNG_PDX;
1253 ym_write(sc, SA3_PWR_MNG, pw);
1254
1255 /* wait 100 ms */
1256 if (nosleep)
1257 delay(100000);
1258 else
1259 tsleep(&wchan, PWAIT, "ym_pu1", hz / 10);
1260
1261 pw &= ~(SA3_PWR_MNG_PSV | SA3_PWR_MNG_PDN);
1262 ym_write(sc, SA3_PWR_MNG, pw);
1263
1264 /* wait 70 ms */
1265 if (nosleep)
1266 delay(70000);
1267 else
1268 tsleep(&wchan, PWAIT, "ym_pu2", hz / 14);
1269
1270 /* The chip is muted automatically --- unmute it now. */
1271 ym_mute(sc, SA3_VOL_L, sc->master_mute);
1272 ym_mute(sc, SA3_VOL_R, sc->master_mute);
1273 }
1274
1275 /* callout handler for power-down */
1276 void
1277 ym_powerdown_blocks(void *arg)
1278 {
1279 struct ym_softc *sc;
1280 uint16_t parts;
1281 uint16_t on_blocks;
1282 uint8_t sv;
1283
1284 sc = arg;
1285 on_blocks = sc->sc_on_blocks;
1286 DPRINTF(("%s: ym_powerdown_blocks: turning_off 0x%x\n",
1287 DVNAME(sc), sc->sc_turning_off));
1288
1289 mutex_spin_enter(&sc->sc_ad1848.sc_ad1848.sc_intr_lock);
1290
1291 on_blocks = sc->sc_on_blocks;
1292
1293 /* Be sure not to change the state of the chip. Save it first. */
1294 sv = bus_space_read_1(sc->sc_iot, sc->sc_controlioh, SA3_CTL_INDEX);
1295
1296 parts = sc->sc_turning_off;
1297
1298 if (on_blocks & ~parts & YM_POWER_CODEC_CTL)
1299 parts &= ~(YM_POWER_CODEC_P | YM_POWER_CODEC_R);
1300 if (parts & YM_POWER_CODEC_CTL) {
1301 if ((on_blocks & YM_POWER_CODEC_P) == 0)
1302 parts |= YM_POWER_CODEC_P;
1303 if ((on_blocks & YM_POWER_CODEC_R) == 0)
1304 parts |= YM_POWER_CODEC_R;
1305 }
1306 parts &= ~YM_POWER_CODEC_PSEUDO;
1307
1308 /* If CODEC is being off, save the state. */
1309 if ((sc->sc_on_blocks & YM_POWER_CODEC_DIGITAL) &&
1310 (sc->sc_on_blocks & ~sc->sc_turning_off &
1311 YM_POWER_CODEC_DIGITAL) == 0)
1312 ym_save_codec_regs(sc);
1313
1314 if (YM_IS_SA3(sc)) {
1315 /* OPL3-SA3 */
1316 ym_write(sc, SA3_DPWRDWN,
1317 ym_read(sc, SA3_DPWRDWN) | (u_int8_t) parts);
1318 ym_write(sc, SA3_APWRDWN,
1319 ym_read(sc, SA3_APWRDWN) | (parts >> 8));
1320 } else {
1321 /* OPL3-SA2 (only OPL3 can be off partially) */
1322 if (parts & YM_POWER_OPL3)
1323 ym_write(sc, SA3_PWR_MNG,
1324 ym_read(sc, SA3_PWR_MNG) | SA2_PWR_MNG_FMPS);
1325 }
1326
1327 if (((sc->sc_on_blocks &= ~sc->sc_turning_off) & YM_POWER_ACTIVE) == 0)
1328 ym_chip_powerdown(sc);
1329
1330 sc->sc_turning_off = 0;
1331
1332 /* Restore the state of the chip. */
1333 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, SA3_CTL_INDEX, sv);
1334
1335 mutex_spin_exit(&sc->sc_ad1848.sc_ad1848.sc_intr_lock);
1336 }
1337
1338 /*
1339 * Power control entry point.
1340 */
1341 void
1342 ym_power_ctl(struct ym_softc *sc, int parts, int onoff)
1343 {
1344 int need_restore_codec;
1345
1346 DPRINTF(("%s: ym_power_ctl: parts = 0x%x, %s\n",
1347 DVNAME(sc), parts, onoff ? "on" : "off"));
1348
1349 #ifdef DIAGNOSTIC
1350 if (curproc == NULL)
1351 panic("ym_power_ctl: no curproc");
1352 #endif
1353 /* This function may sleep --- needs locking. */
1354 while (sc->sc_in_power_ctl & YM_POWER_CTL_INUSE) {
1355 sc->sc_in_power_ctl |= YM_POWER_CTL_WANTED;
1356 DPRINTF(("%s: ym_power_ctl: sleeping\n", DVNAME(sc)));
1357 tsleep(&sc->sc_in_power_ctl, PWAIT, "ym_pc", 0);
1358 DPRINTF(("%s: ym_power_ctl: awaken\n", DVNAME(sc)));
1359 }
1360 sc->sc_in_power_ctl |= YM_POWER_CTL_INUSE;
1361
1362 /* Defeat softclock interrupts. */
1363 mutex_spin_enter(&sc->sc_ad1848.sc_ad1848.sc_intr_lock);
1364
1365 /* If ON requested to parts which are scheduled to OFF, cancel it. */
1366 if (onoff && sc->sc_turning_off && (sc->sc_turning_off &= ~parts) == 0)
1367 callout_stop(&sc->sc_powerdown_ch);
1368
1369 if (!onoff && sc->sc_turning_off)
1370 parts &= ~sc->sc_turning_off;
1371
1372 /* Discard bits which are currently {on,off}. */
1373 parts &= onoff ? ~sc->sc_on_blocks : sc->sc_on_blocks;
1374
1375 /* Cancel previous timeout if needed. */
1376 if (parts != 0 && sc->sc_turning_off)
1377 callout_stop(&sc->sc_powerdown_ch);
1378
1379 mutex_spin_exit(&sc->sc_ad1848.sc_ad1848.sc_intr_lock);
1380
1381 if (parts == 0)
1382 goto unlock; /* no work to do */
1383
1384 if (onoff) {
1385 /* Turning on is done immediately. */
1386
1387 /* If the chip is off, turn it on. */
1388 if ((sc->sc_on_blocks & YM_POWER_ACTIVE) == 0)
1389 ym_chip_powerup(sc, 0);
1390
1391 need_restore_codec = (parts & YM_POWER_CODEC_DIGITAL) &&
1392 (sc->sc_on_blocks & YM_POWER_CODEC_DIGITAL) == 0;
1393
1394 sc->sc_on_blocks |= parts;
1395 if (parts & YM_POWER_CODEC_CTL)
1396 parts |= YM_POWER_CODEC_P | YM_POWER_CODEC_R;
1397
1398 mutex_spin_enter(&sc->sc_ad1848.sc_ad1848.sc_intr_lock);
1399
1400 if (YM_IS_SA3(sc)) {
1401 /* OPL3-SA3 */
1402 ym_write(sc, SA3_DPWRDWN,
1403 ym_read(sc, SA3_DPWRDWN) & (u_int8_t)~parts);
1404 ym_write(sc, SA3_APWRDWN,
1405 ym_read(sc, SA3_APWRDWN) & ~(parts >> 8));
1406 } else {
1407 /* OPL3-SA2 (only OPL3 can be off partially) */
1408 if (parts & YM_POWER_OPL3)
1409 ym_write(sc, SA3_PWR_MNG,
1410 ym_read(sc, SA3_PWR_MNG)
1411 & ~SA2_PWR_MNG_FMPS);
1412 }
1413 if (need_restore_codec)
1414 ym_restore_codec_regs(sc);
1415
1416 mutex_spin_exit(&sc->sc_ad1848.sc_ad1848.sc_intr_lock);
1417 } else {
1418 /* Turning off is delayed. */
1419 sc->sc_turning_off |= parts;
1420 }
1421
1422 /* Schedule turning off. */
1423 if (sc->sc_pow_mode != YM_POWER_NOSAVE && sc->sc_turning_off)
1424 callout_reset(&sc->sc_powerdown_ch, hz * sc->sc_pow_timeout,
1425 ym_powerdown_blocks, sc);
1426
1427 unlock:
1428 if (sc->sc_in_power_ctl & YM_POWER_CTL_WANTED)
1429 wakeup(&sc->sc_in_power_ctl);
1430 sc->sc_in_power_ctl = 0;
1431 }
1432 #endif /* not AUDIO_NO_POWER_CTL */
1433