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