Home | History | Annotate | Line # | Download | only in pci
esa.c revision 1.28
      1 /* $NetBSD: esa.c,v 1.28 2005/01/15 15:19:52 kent Exp $ */
      2 
      3 /*
      4  * Copyright (c) 2001, 2002 Jared D. McNeill <jmcneill (at) invisible.ca>
      5  * 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. The name of the author may not be used to endorse or promote products
     13  *    derived from this software without specific prior written permission.
     14  *
     15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     20  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     21  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     22  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     23  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     25  * SUCH DAMAGE.
     26  */
     27 
     28 /*
     29  * ESS Allegro-1 / Maestro3 Audio Driver
     30  *
     31  * Based on the FreeBSD maestro3 driver and the NetBSD eap driver.
     32  * Original driver by Don Kim.
     33  *
     34  * The list management code could possibly be written better, but what
     35  * we have right now does the job nicely. Thanks to Zach Brown <zab (at) zabbo.net>
     36  * and Andrew MacDonald <amac (at) epsilon.yi.org> for helping me debug the
     37  * problems with the original list management code present in the Linux
     38  * driver.
     39  */
     40 
     41 #include <sys/cdefs.h>
     42 __KERNEL_RCSID(0, "$NetBSD: esa.c,v 1.28 2005/01/15 15:19:52 kent Exp $");
     43 
     44 #include <sys/types.h>
     45 #include <sys/errno.h>
     46 #include <sys/null.h>
     47 #include <sys/param.h>
     48 #include <sys/systm.h>
     49 #include <sys/malloc.h>
     50 #include <sys/device.h>
     51 #include <sys/conf.h>
     52 #include <sys/exec.h>
     53 #include <sys/select.h>
     54 #include <sys/audioio.h>
     55 
     56 #include <machine/bus.h>
     57 #include <machine/intr.h>
     58 
     59 #include <dev/pci/pcidevs.h>
     60 #include <dev/pci/pcivar.h>
     61 
     62 #include <dev/audio_if.h>
     63 #include <dev/mulaw.h>
     64 #include <dev/auconv.h>
     65 #include <dev/ic/ac97var.h>
     66 #include <dev/ic/ac97reg.h>
     67 
     68 #include <dev/pci/esareg.h>
     69 #include <dev/pci/esadsp.h>
     70 #include <dev/pci/esavar.h>
     71 
     72 #define PCI_CBIO	0x10
     73 
     74 #define ESA_DAC_DATA	0x1100
     75 
     76 enum {
     77 	ESS_ALLEGRO1,
     78 	ESS_MAESTRO3
     79 };
     80 
     81 static struct esa_card_type {
     82 	uint16_t pci_vendor_id;
     83 	uint16_t pci_product_id;
     84 	int type;
     85 	int delay1, delay2;
     86 } esa_card_types[] = {
     87 	{ PCI_VENDOR_ESSTECH, PCI_PRODUCT_ESSTECH_ALLEGRO1,
     88 	  ESS_ALLEGRO1, 50, 800 },
     89 	{ PCI_VENDOR_ESSTECH, PCI_PRODUCT_ESSTECH_MAESTRO3,
     90 	  ESS_MAESTRO3, 20, 500 },
     91 	{ PCI_VENDOR_ESSTECH, PCI_PRODUCT_ESSTECH_MAESTRO3_2,
     92 	  ESS_MAESTRO3, 20, 500 },
     93 	{ 0, 0, 0, 0, 0 }
     94 };
     95 
     96 struct audio_device esa_device = {
     97 	"ESS Allegro",
     98 	"",
     99 	"esa"
    100 };
    101 
    102 int		esa_match(struct device *, struct cfdata *, void *);
    103 void		esa_attach(struct device *, struct device *, void *);
    104 int		esa_detach(struct device *, int);
    105 
    106 /* audio(9) functions */
    107 int		esa_query_encoding(void *, struct audio_encoding *);
    108 int		esa_set_params(void *, int, int, audio_params_t *,
    109 			       audio_params_t *, stream_filter_list_t *,
    110 			       stream_filter_list_t *);
    111 int		esa_round_blocksize(void *, int, int, const audio_params_t *);
    112 int		esa_commit_settings(void *);
    113 int		esa_halt_output(void *);
    114 int		esa_halt_input(void *);
    115 int		esa_set_port(void *, mixer_ctrl_t *);
    116 int		esa_get_port(void *, mixer_ctrl_t *);
    117 int		esa_query_devinfo(void *, mixer_devinfo_t *);
    118 void *		esa_malloc(void *, int, size_t, struct malloc_type *, int);
    119 void		esa_free(void *, void *, struct malloc_type *);
    120 int		esa_getdev(void *, struct audio_device *);
    121 size_t		esa_round_buffersize(void *, int, size_t);
    122 int		esa_get_props(void *);
    123 int		esa_trigger_output(void *, void *, void *, int,
    124 				   void (*)(void *), void *,
    125 				   const audio_params_t *);
    126 int		esa_trigger_input(void *, void *, void *, int,
    127 				  void (*)(void *), void *,
    128 				  const audio_params_t *);
    129 
    130 int		esa_intr(void *);
    131 int		esa_allocmem(struct esa_softc *, size_t, size_t,
    132 			     struct esa_dma *);
    133 int		esa_freemem(struct esa_softc *, struct esa_dma *);
    134 paddr_t		esa_mappage(void *, void *, off_t, int);
    135 
    136 /* Supporting subroutines */
    137 uint16_t	esa_read_assp(struct esa_softc *, uint16_t, uint16_t);
    138 void		esa_write_assp(struct esa_softc *, uint16_t, uint16_t,
    139 			       uint16_t);
    140 int		esa_init_codec(struct esa_softc *);
    141 int		esa_attach_codec(void *, struct ac97_codec_if *);
    142 int		esa_read_codec(void *, uint8_t, uint16_t *);
    143 int		esa_write_codec(void *, uint8_t, uint16_t);
    144 int		esa_reset_codec(void *);
    145 enum ac97_host_flags	esa_flags_codec(void *);
    146 int		esa_wait(struct esa_softc *);
    147 int		esa_init(struct esa_softc *);
    148 void		esa_config(struct esa_softc *);
    149 uint8_t		esa_assp_halt(struct esa_softc *);
    150 void		esa_codec_reset(struct esa_softc *);
    151 int		esa_amp_enable(struct esa_softc *);
    152 void		esa_enable_interrupts(struct esa_softc *);
    153 uint32_t	esa_get_pointer(struct esa_softc *, struct esa_channel *);
    154 
    155 /* list management */
    156 int		esa_add_list(struct esa_voice *, struct esa_list *, uint16_t,
    157 			     int);
    158 void		esa_remove_list(struct esa_voice *, struct esa_list *, int);
    159 
    160 /* power management */
    161 int		esa_power(struct esa_softc *, int);
    162 void		esa_powerhook(int, void *);
    163 int		esa_suspend(struct esa_softc *);
    164 int		esa_resume(struct esa_softc *);
    165 
    166 
    167 #define ESA_NENCODINGS 8
    168 static audio_encoding_t esa_encoding[ESA_NENCODINGS] = {
    169 	{ 0, AudioEulinear, AUDIO_ENCODING_ULINEAR, 8, 0 },
    170 	{ 1, AudioEmulaw, AUDIO_ENCODING_ULAW, 8,
    171 		AUDIO_ENCODINGFLAG_EMULATED },
    172 	{ 2, AudioEalaw, AUDIO_ENCODING_ALAW, 8, AUDIO_ENCODINGFLAG_EMULATED },
    173 	{ 3, AudioEslinear, AUDIO_ENCODING_SLINEAR, 8,
    174 		AUDIO_ENCODINGFLAG_EMULATED }, /* XXX: Are you sure? */
    175 	{ 4, AudioEslinear_le, AUDIO_ENCODING_SLINEAR_LE, 16, 0 },
    176 	{ 5, AudioEulinear_le, AUDIO_ENCODING_ULINEAR_LE, 16,
    177 		AUDIO_ENCODINGFLAG_EMULATED },
    178 	{ 6, AudioEslinear_be, AUDIO_ENCODING_SLINEAR_BE, 16,
    179 		AUDIO_ENCODINGFLAG_EMULATED },
    180 	{ 7, AudioEulinear_be, AUDIO_ENCODING_ULINEAR_BE, 16,
    181 		AUDIO_ENCODINGFLAG_EMULATED }
    182 };
    183 
    184 #define ESA_NFORMATS	4
    185 static const struct audio_format esa_formats[ESA_NFORMATS] = {
    186 	{NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
    187 	 2, AUFMT_STEREO, 0, {ESA_MINRATE, ESA_MAXRATE}},
    188 	{NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
    189 	 1, AUFMT_MONAURAL, 0, {ESA_MINRATE, ESA_MAXRATE}},
    190 	{NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_ULINEAR_LE, 8, 8,
    191 	 2, AUFMT_STEREO, 0, {ESA_MINRATE, ESA_MAXRATE}},
    192 	{NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_ULINEAR_LE, 8, 8,
    193 	 1, AUFMT_MONAURAL, 0, {ESA_MINRATE, ESA_MAXRATE}},
    194 };
    195 
    196 const struct audio_hw_if esa_hw_if = {
    197 	NULL,			/* open */
    198 	NULL,			/* close */
    199 	NULL,			/* drain */
    200 	esa_query_encoding,
    201 	esa_set_params,
    202 	esa_round_blocksize,
    203 	esa_commit_settings,
    204 	NULL,			/* init_output */
    205 	NULL,			/* init_input */
    206 	NULL,			/* start_output */
    207 	NULL,			/* start_input */
    208 	esa_halt_output,
    209 	esa_halt_input,
    210 	NULL,			/* speaker_ctl */
    211 	esa_getdev,
    212 	NULL,			/* getfd */
    213 	esa_set_port,
    214 	esa_get_port,
    215 	esa_query_devinfo,
    216 	esa_malloc,
    217 	esa_free,
    218 	esa_round_buffersize,
    219 	esa_mappage,
    220 	esa_get_props,
    221 	esa_trigger_output,
    222 	esa_trigger_input
    223 };
    224 
    225 CFATTACH_DECL(esa, sizeof(struct esa_softc), esa_match, esa_attach,
    226     esa_detach, NULL);
    227 
    228 /*
    229  * audio(9) functions
    230  */
    231 
    232 int
    233 esa_query_encoding(void *hdl, struct audio_encoding *ae)
    234 {
    235 
    236 	if (ae->index < 0 || ae->index >= ESA_NENCODINGS)
    237 		return EINVAL;
    238 	*ae = esa_encoding[ae->index];
    239 
    240 	return 0;
    241 }
    242 
    243 int
    244 esa_set_params(void *hdl, int setmode, int usemode,
    245 	       audio_params_t *play, audio_params_t *rec,
    246 	       stream_filter_list_t *pfil, stream_filter_list_t *rfil)
    247 {
    248 	struct esa_voice *vc;
    249 	//struct esa_softc *sc = (struct esa_softc *)vc->parent;
    250 	struct esa_channel *ch;
    251 	struct audio_params *p;
    252 	stream_filter_list_t *fil;
    253 	int mode, i;
    254 
    255 	vc = hdl;
    256 	for (mode = AUMODE_RECORD; mode != -1;
    257 	     mode = (mode == AUMODE_RECORD) ? AUMODE_PLAY : -1) {
    258 		if ((setmode & mode) == 0)
    259 			continue;
    260 
    261 		switch (mode) {
    262 		case AUMODE_PLAY:
    263 			p = play;
    264 			ch = &vc->play;
    265 			fil = pfil;
    266 			break;
    267 		case AUMODE_RECORD:
    268 			p = rec;
    269 			ch = &vc->rec;
    270 			fil = rfil;
    271 			break;
    272 		default:
    273 			return EINVAL;
    274 		}
    275 
    276 		if (p->sample_rate < ESA_MINRATE ||
    277 		    p->sample_rate > ESA_MAXRATE ||
    278 		    (p->precision != 8 && p->precision != 16) ||
    279 		    (p->channels < 1 && p->channels > 2))
    280 			return EINVAL;
    281 
    282 		i = auconv_set_converter(esa_formats, ESA_NFORMATS,
    283 					 mode, p, FALSE, fil);
    284 		if (i < 0)
    285 			return EINVAL;
    286 		if (fil->req_size > 0)
    287 			p = &fil->filters[0].param;
    288 		ch->mode = *p;
    289 	}
    290 
    291 	return 0;
    292 }
    293 
    294 int
    295 esa_commit_settings(void *hdl)
    296 {
    297 	struct esa_voice *vc;
    298 	struct esa_softc *sc;
    299 	const audio_params_t *p;
    300 	const audio_params_t *r;
    301 	uint32_t data;
    302 	uint32_t freq;
    303 	int data_bytes;
    304 
    305 	vc = hdl;
    306 	sc = (struct esa_softc *)vc->parent;
    307 	p = &vc->play.mode;
    308 	r = &vc->rec.mode;
    309 	data_bytes = (((ESA_MINISRC_TMP_BUFFER_SIZE & ~1) +
    310 	    (ESA_MINISRC_IN_BUFFER_SIZE & ~1) +
    311 	    (ESA_MINISRC_OUT_BUFFER_SIZE & ~1) + 4) + 255)
    312 	    &~ 255;
    313 	/* playback */
    314 	vc->play.data_offset = ESA_DAC_DATA + (data_bytes * vc->index);
    315 	if (p->channels == 1)
    316 		data = 1;
    317 	else
    318 		data = 0;
    319 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    320 		       vc->play.data_offset + ESA_SRC3_MODE_OFFSET,
    321 		       data);
    322 	if (p->precision  == 8)
    323 		data = 1;
    324 	else
    325 		data = 0;
    326 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    327 		       vc->play.data_offset + ESA_SRC3_WORD_LENGTH_OFFSET,
    328 		       data);
    329 	if ((freq = ((p->sample_rate << 15) + 24000) / 48000) != 0) {
    330 		freq--;
    331 	}
    332 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    333 		       vc->play.data_offset + ESA_CDATA_FREQUENCY, freq);
    334 
    335 	/* recording */
    336 	vc->rec.data_offset = ESA_DAC_DATA + (data_bytes * vc->index) +
    337 			      (data_bytes / 2);
    338 	if (r->channels == 1)
    339 		data = 1;
    340 	else
    341 		data = 0;
    342 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    343 		       vc->rec.data_offset + ESA_SRC3_MODE_OFFSET,
    344 		       data);
    345 	if (r->precision == 8)
    346 		data = 1;
    347 	else
    348 		data = 0;
    349 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    350 		       vc->rec.data_offset + ESA_SRC3_WORD_LENGTH_OFFSET,
    351 		       data);
    352 	if ((freq = ((r->sample_rate << 15) + 24000) / 48000) != 0) {
    353 		freq--;
    354 	}
    355 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    356 		       vc->rec.data_offset + ESA_CDATA_FREQUENCY, freq);
    357 
    358 	return 0;
    359 };
    360 
    361 int
    362 esa_round_blocksize(void *hdl, int bs, int mode, const audio_params_t *param)
    363 {
    364 
    365 	return bs & ~0x20;	/* Be conservative; align to 32 bytes */
    366 }
    367 
    368 int
    369 esa_halt_output(void *hdl)
    370 {
    371 	struct esa_voice *vc;
    372 	struct esa_softc *sc;
    373 	bus_space_tag_t iot;
    374 	bus_space_handle_t ioh;
    375 	uint16_t data;
    376 
    377 	vc = hdl;
    378 	sc = (struct esa_softc *)vc->parent;
    379 	iot = sc->sc_iot;
    380 	ioh = sc->sc_ioh;
    381 	if (vc->play.active == 0)
    382 		return 0;
    383 
    384 	vc->play.active = 0;
    385 
    386 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    387 		       ESA_CDATA_INSTANCE_READY + vc->play.data_offset, 0);
    388 
    389 	sc->sc_ntimers--;
    390 	if (sc->sc_ntimers == 0) {
    391 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    392 			       ESA_KDATA_TIMER_COUNT_RELOAD, 0);
    393 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    394 			       ESA_KDATA_TIMER_COUNT_CURRENT, 0);
    395 		data = bus_space_read_2(iot, ioh, ESA_HOST_INT_CTRL);
    396 		bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL,
    397 		    data & ~ESA_CLKRUN_GEN_ENABLE);
    398 	}
    399 
    400 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    401 		       ESA_KDATA_MIXER_TASK_NUMBER,
    402 		       sc->mixer_list.indexmap[vc->index]);
    403 	/* remove ourselves from the packed lists */
    404 	esa_remove_list(vc, &sc->mixer_list, vc->index);
    405 	esa_remove_list(vc, &sc->dma_list, vc->index);
    406 	esa_remove_list(vc, &sc->msrc_list, vc->index);
    407 
    408 	return 0;
    409 }
    410 
    411 int
    412 esa_halt_input(void *hdl)
    413 {
    414 	struct esa_voice *vc;
    415 	struct esa_softc *sc;
    416 	bus_space_tag_t iot;
    417 	bus_space_handle_t ioh;
    418 	uint32_t data;
    419 
    420 	vc = hdl;
    421 	sc = (struct esa_softc *)vc->parent;
    422 	iot = sc->sc_iot;
    423 	ioh = sc->sc_ioh;
    424 	if (vc->rec.active == 0)
    425 		return 0;
    426 
    427 	vc->rec.active = 0;
    428 
    429 	sc->sc_ntimers--;
    430 	if (sc->sc_ntimers == 0) {
    431 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    432 			       ESA_KDATA_TIMER_COUNT_RELOAD, 0);
    433 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    434 			       ESA_KDATA_TIMER_COUNT_CURRENT, 0);
    435 		data = bus_space_read_2(iot, ioh, ESA_HOST_INT_CTRL);
    436 		bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL,
    437 				  data & ~ESA_CLKRUN_GEN_ENABLE);
    438 	}
    439 
    440 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, vc->rec.data_offset +
    441 		       ESA_CDATA_INSTANCE_READY, 0);
    442 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_ADC1_REQUEST,
    443 		       0);
    444 
    445 	/* remove ourselves from the packed lists */
    446 	esa_remove_list(vc, &sc->adc1_list, vc->index + ESA_NUM_VOICES);
    447 	esa_remove_list(vc, &sc->dma_list, vc->index + ESA_NUM_VOICES);
    448 	esa_remove_list(vc, &sc->msrc_list, vc->index + ESA_NUM_VOICES);
    449 
    450 	return 0;
    451 }
    452 
    453 void *
    454 esa_malloc(void *hdl, int direction, size_t size, struct malloc_type *type,
    455     int flags)
    456 {
    457 	struct esa_voice *vc;
    458 	struct esa_softc *sc;
    459 	struct esa_dma *p;
    460 	int error;
    461 
    462 	p = malloc(sizeof(*p), type, flags);
    463 	if (p == NULL)
    464 		return NULL;
    465 	vc = hdl;
    466 	sc = (struct esa_softc *)vc->parent;
    467 	error = esa_allocmem(sc, size, 16, p);
    468 	if (error) {
    469 		free(p, type);
    470 		printf("%s: esa_malloc: not enough memory\n",
    471 		    sc->sc_dev.dv_xname);
    472 		return 0;
    473 	}
    474 	p->next = vc->dma;
    475 	vc->dma = p;
    476 
    477 	return KERNADDR(p);
    478 }
    479 
    480 void
    481 esa_free(void *hdl, void *addr, struct malloc_type *type)
    482 {
    483 	struct esa_voice *vc;
    484 	struct esa_softc *sc;
    485 	struct esa_dma *p;
    486 	struct esa_dma **pp;
    487 
    488 	vc = hdl;
    489 	sc = (struct esa_softc *)vc->parent;
    490 	for (pp = &vc->dma; (p = *pp) != NULL; pp = &p->next)
    491 		if (KERNADDR(p) == addr) {
    492 			esa_freemem(sc, p);
    493 			*pp = p->next;
    494 			free(p, type);
    495 			return;
    496 		}
    497 }
    498 
    499 int
    500 esa_getdev(void *hdl, struct audio_device *ret)
    501 {
    502 
    503 	*ret = esa_device;
    504 	return 0;
    505 }
    506 
    507 int
    508 esa_set_port(void *hdl, mixer_ctrl_t *mc)
    509 {
    510 	struct esa_voice *vc;
    511 	struct esa_softc *sc;
    512 
    513 	vc = hdl;
    514 	sc = (struct esa_softc *)vc->parent;
    515 	return sc->codec_if->vtbl->mixer_set_port(sc->codec_if, mc);
    516 }
    517 
    518 int
    519 esa_get_port(void *hdl, mixer_ctrl_t *mc)
    520 {
    521 	struct esa_voice *vc;
    522 	struct esa_softc *sc;
    523 
    524 	vc = hdl;
    525 	sc = (struct esa_softc *)vc->parent;
    526 	return sc->codec_if->vtbl->mixer_get_port(sc->codec_if, mc);
    527 }
    528 
    529 int
    530 esa_query_devinfo(void *hdl, mixer_devinfo_t *di)
    531 {
    532 	struct esa_voice *vc;
    533 	struct esa_softc *sc;
    534 
    535 	vc = hdl;
    536 	sc = (struct esa_softc *)vc->parent;
    537 	return sc->codec_if->vtbl->query_devinfo(sc->codec_if, di);
    538 }
    539 
    540 size_t
    541 esa_round_buffersize(void *hdl, int direction, size_t bufsize)
    542 {
    543 
    544 	return bufsize;
    545 }
    546 
    547 int
    548 esa_get_props(void *hdl)
    549 {
    550 
    551 	return AUDIO_PROP_MMAP | AUDIO_PROP_INDEPENDENT | AUDIO_PROP_FULLDUPLEX;
    552 }
    553 
    554 int
    555 esa_trigger_output(void *hdl, void *start, void *end, int blksize,
    556 		   void (*intr)(void *), void *intrarg,
    557 		   const audio_params_t *param)
    558 {
    559 	struct esa_voice *vc;
    560 	struct esa_softc *sc;
    561 	struct esa_dma *p;
    562 	bus_space_tag_t iot;
    563 	bus_space_handle_t ioh;
    564 	size_t size;
    565 	uint32_t data, bufaddr, i;
    566 	int data_bytes, dac_data, dsp_in_size;
    567 	int dsp_out_size, dsp_in_buf, dsp_out_buf;
    568 
    569 	vc = hdl;
    570 	sc = (struct esa_softc *)vc->parent;
    571 	iot = sc->sc_iot;
    572 	ioh = sc->sc_ioh;
    573 	data_bytes = (((ESA_MINISRC_TMP_BUFFER_SIZE & ~1) +
    574 	    (ESA_MINISRC_IN_BUFFER_SIZE & ~1) +
    575 	    (ESA_MINISRC_OUT_BUFFER_SIZE & ~1) + 4) + 255) & ~255;
    576 	dac_data = ESA_DAC_DATA + (data_bytes * vc->index);
    577 	dsp_in_size = ESA_MINISRC_IN_BUFFER_SIZE - (0x20 * 2);
    578 	dsp_out_size = ESA_MINISRC_OUT_BUFFER_SIZE - (0x20 * 2);
    579 	dsp_in_buf = dac_data + (ESA_MINISRC_TMP_BUFFER_SIZE / 2);
    580 	dsp_out_buf = dsp_in_buf + (dsp_in_size / 2) + 1;
    581 
    582 	if (vc->play.active)
    583 		return EINVAL;
    584 
    585 	for (p = vc->dma; p && KERNADDR(p) != start; p = p->next)
    586 		continue;
    587 	if (p == NULL) {
    588 		printf("%s: esa_trigger_output: bad addr %p\n",
    589 		    sc->sc_dev.dv_xname, start);
    590 		return EINVAL;
    591 	}
    592 
    593 	vc->play.active = 1;
    594 	vc->play.intr = intr;
    595 	vc->play.arg = intrarg;
    596 	vc->play.pos = 0;
    597 	vc->play.count = 0;
    598 	vc->play.buf = start;
    599 	vc->play.bufsize = size = (size_t)(((caddr_t)end - (caddr_t)start));
    600 	vc->play.blksize = blksize;
    601 	bufaddr = DMAADDR(p);
    602 	vc->play.start = bufaddr;
    603 
    604 #define LO(x) ((x) & 0x0000ffff)
    605 #define HI(x) ((x) >> 16)
    606 
    607 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    608 	    ESA_CDATA_HOST_SRC_ADDRL, LO(bufaddr));
    609 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    610 	    ESA_CDATA_HOST_SRC_ADDRH, HI(bufaddr));
    611 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    612 	    ESA_CDATA_HOST_SRC_END_PLUS_1L, LO(bufaddr + size));
    613 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    614 	    ESA_CDATA_HOST_SRC_END_PLUS_1H, HI(bufaddr + size));
    615 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    616 	    ESA_CDATA_HOST_SRC_CURRENTL, LO(bufaddr));
    617 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    618 	    ESA_CDATA_HOST_SRC_CURRENTH, HI(bufaddr));
    619 
    620 	/* DSP buffers */
    621 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    622 	    ESA_CDATA_IN_BUF_BEGIN, dsp_in_buf);
    623 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    624 	    ESA_CDATA_IN_BUF_END_PLUS_1, dsp_in_buf + (dsp_in_size / 2));
    625 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    626 	    ESA_CDATA_IN_BUF_HEAD, dsp_in_buf);
    627 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    628 	    ESA_CDATA_IN_BUF_TAIL, dsp_in_buf);
    629 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    630 	    ESA_CDATA_OUT_BUF_BEGIN, dsp_out_buf);
    631 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    632 	    ESA_CDATA_OUT_BUF_END_PLUS_1, dsp_out_buf + (dsp_out_size / 2));
    633 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    634 	    ESA_CDATA_OUT_BUF_HEAD, dsp_out_buf);
    635 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    636 	    ESA_CDATA_OUT_BUF_TAIL, dsp_out_buf);
    637 
    638 	/* Some per-client initializers */
    639 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    640 	    ESA_SRC3_DIRECTION_OFFSET + 12, dac_data + 40 + 8);
    641 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    642 	    ESA_SRC3_DIRECTION_OFFSET + 19, 0x400 + ESA_MINISRC_COEF_LOC);
    643 	/* Enable or disable low-pass filter? (0xff if rate > 45000) */
    644 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    645 	    ESA_SRC3_DIRECTION_OFFSET + 22,
    646 	    vc->play.mode.sample_rate > 45000 ? 0xff : 0);
    647 	/* Tell it which way DMA is going */
    648 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    649 	    ESA_CDATA_DMA_CONTROL,
    650 	    ESA_DMACONTROL_AUTOREPEAT + ESA_DMAC_PAGE3_SELECTOR +
    651 	    ESA_DMAC_BLOCKF_SELECTOR);
    652 
    653 	/* Set an armload of static initializers */
    654 	for (i = 0; i < (sizeof(esa_playvals) / sizeof(esa_playvals[0])); i++)
    655 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    656 		    esa_playvals[i].addr, esa_playvals[i].val);
    657 
    658 	/* Put us in the packed task lists */
    659 	esa_add_list(vc, &sc->msrc_list, dac_data >> ESA_DP_SHIFT_COUNT,
    660 		     vc->index);
    661 	esa_add_list(vc, &sc->dma_list, dac_data >> ESA_DP_SHIFT_COUNT,
    662 		     vc->index);
    663 	esa_add_list(vc, &sc->mixer_list, dac_data >> ESA_DP_SHIFT_COUNT,
    664 		     vc->index);
    665 #undef LO
    666 #undef HI
    667 
    668 	/* XXX */
    669 	//esa_commit_settings(vc);
    670 
    671 	sc->sc_ntimers++;
    672 
    673 	if (sc->sc_ntimers == 1) {
    674 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    675 		    ESA_KDATA_TIMER_COUNT_RELOAD, 240);
    676 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    677 		    ESA_KDATA_TIMER_COUNT_CURRENT, 240);
    678 		data = bus_space_read_2(iot, ioh, ESA_HOST_INT_CTRL);
    679 		bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL,
    680 		    data | ESA_CLKRUN_GEN_ENABLE);
    681 	}
    682 
    683 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data +
    684 	    ESA_CDATA_INSTANCE_READY, 1);
    685 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    686 	    ESA_KDATA_MIXER_TASK_NUMBER,
    687 	    sc->mixer_list.indexmap[vc->index]);
    688 
    689 	return 0;
    690 }
    691 
    692 int
    693 esa_trigger_input(void *hdl, void *start, void *end, int blksize,
    694 		  void (*intr)(void *), void *intrarg,
    695 		  const audio_params_t *param)
    696 {
    697 	struct esa_voice *vc;
    698 	struct esa_softc *sc;
    699 	struct esa_dma *p;
    700 	bus_space_tag_t iot;
    701 	bus_space_handle_t ioh;
    702 	uint32_t data, bufaddr, i;
    703 	size_t size;
    704 	int data_bytes, adc_data, dsp_in_size;
    705 	int dsp_out_size, dsp_in_buf, dsp_out_buf;
    706 
    707 	vc = hdl;
    708 	sc = (struct esa_softc *)vc->parent;
    709 	iot = sc->sc_iot;
    710 	ioh = sc->sc_ioh;
    711 	data_bytes = (((ESA_MINISRC_TMP_BUFFER_SIZE & ~1) +
    712 	    (ESA_MINISRC_IN_BUFFER_SIZE & ~1) +
    713 	    (ESA_MINISRC_OUT_BUFFER_SIZE & ~1) + 4) + 255) & ~255;
    714 	adc_data = ESA_DAC_DATA + (data_bytes * vc->index) + (data_bytes / 2);
    715 	dsp_in_size = ESA_MINISRC_IN_BUFFER_SIZE - (0x10 * 2);
    716 	dsp_out_size = ESA_MINISRC_OUT_BUFFER_SIZE - (0x10 * 2);
    717 	dsp_in_buf = adc_data + (ESA_MINISRC_TMP_BUFFER_SIZE / 2);
    718 	dsp_out_buf = dsp_in_buf + (dsp_in_size / 2) + 1;
    719 
    720 	vc->rec.data_offset = adc_data;
    721 
    722 	/* We only support 1 recording channel */
    723 	if (vc->index > 0)
    724 		return ENODEV;
    725 
    726 	if (vc->rec.active)
    727 		return EINVAL;
    728 
    729 	for (p = vc->dma; p && KERNADDR(p) != start; p = p->next)
    730 		continue;
    731 	if (p == NULL) {
    732 		printf("%s: esa_trigger_input: bad addr %p\n",
    733 		    sc->sc_dev.dv_xname, start);
    734 		return EINVAL;
    735 	}
    736 
    737 	vc->rec.active = 1;
    738 	vc->rec.intr = intr;
    739 	vc->rec.arg = intrarg;
    740 	vc->rec.pos = 0;
    741 	vc->rec.count = 0;
    742 	vc->rec.buf = start;
    743 	vc->rec.bufsize = size = (size_t)(((caddr_t)end - (caddr_t)start));
    744 	vc->rec.blksize = blksize;
    745 	bufaddr = DMAADDR(p);
    746 	vc->rec.start = bufaddr;
    747 
    748 #define LO(x) ((x) & 0x0000ffff)
    749 #define HI(x) ((x) >> 16)
    750 
    751 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    752 	    ESA_CDATA_HOST_SRC_ADDRL, LO(bufaddr));
    753 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    754 	    ESA_CDATA_HOST_SRC_ADDRH, HI(bufaddr));
    755 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    756 	    ESA_CDATA_HOST_SRC_END_PLUS_1L, LO(bufaddr + size));
    757 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    758 	    ESA_CDATA_HOST_SRC_END_PLUS_1H, HI(bufaddr + size));
    759 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    760 	    ESA_CDATA_HOST_SRC_CURRENTL, LO(bufaddr));
    761 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    762 	    ESA_CDATA_HOST_SRC_CURRENTH, HI(bufaddr));
    763 
    764 	/* DSP buffers */
    765 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    766 	    ESA_CDATA_IN_BUF_BEGIN, dsp_in_buf);
    767 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    768 	    ESA_CDATA_IN_BUF_END_PLUS_1, dsp_in_buf + (dsp_in_size / 2));
    769 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    770 	    ESA_CDATA_IN_BUF_HEAD, dsp_in_buf);
    771 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    772 	    ESA_CDATA_IN_BUF_TAIL, dsp_in_buf);
    773 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    774 	    ESA_CDATA_OUT_BUF_BEGIN, dsp_out_buf);
    775 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    776 	    ESA_CDATA_OUT_BUF_END_PLUS_1, dsp_out_buf + (dsp_out_size / 2));
    777 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    778 	    ESA_CDATA_OUT_BUF_HEAD, dsp_out_buf);
    779 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    780 	    ESA_CDATA_OUT_BUF_TAIL, dsp_out_buf);
    781 
    782 	/* Some per-client initializers */
    783 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    784 	    ESA_SRC3_DIRECTION_OFFSET + 12, adc_data + 40 + 8);
    785 	/* Tell it which way DMA is going */
    786 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    787 	    ESA_CDATA_DMA_CONTROL,
    788 	    ESA_DMACONTROL_DIRECTION + ESA_DMACONTROL_AUTOREPEAT +
    789 	    ESA_DMAC_PAGE3_SELECTOR + ESA_DMAC_BLOCKF_SELECTOR);
    790 
    791 	/* Set an armload of static initializers */
    792 	for (i = 0; i < (sizeof(esa_recvals) / sizeof(esa_recvals[0])); i++)
    793 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    794 		    esa_recvals[i].addr, esa_recvals[i].val);
    795 
    796 	/* Put us in the packed task lists */
    797 	esa_add_list(vc, &sc->adc1_list, adc_data >> ESA_DP_SHIFT_COUNT,
    798 		     vc->index + ESA_NUM_VOICES);
    799 	esa_add_list(vc, &sc->msrc_list, adc_data >> ESA_DP_SHIFT_COUNT,
    800 		     vc->index + ESA_NUM_VOICES);
    801 	esa_add_list(vc, &sc->dma_list, adc_data >> ESA_DP_SHIFT_COUNT,
    802 		     vc->index + ESA_NUM_VOICES);
    803 #undef LO
    804 #undef HI
    805 
    806 	/* XXX */
    807 	//esa_commit_settings(vc);
    808 
    809 	sc->sc_ntimers++;
    810 	if (sc->sc_ntimers == 1) {
    811 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    812 		    ESA_KDATA_TIMER_COUNT_RELOAD, 240);
    813 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
    814 		    ESA_KDATA_TIMER_COUNT_CURRENT, 240);
    815 		data = bus_space_read_2(iot, ioh, ESA_HOST_INT_CTRL);
    816 		bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL,
    817 		    data | ESA_CLKRUN_GEN_ENABLE);
    818 	}
    819 
    820 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data +
    821 	    ESA_CDATA_INSTANCE_READY, 1);
    822 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_ADC1_REQUEST,
    823 	    1);
    824 
    825 	return 0;
    826 }
    827 
    828 /* Interrupt handler */
    829 int
    830 esa_intr(void *hdl)
    831 {
    832 	struct esa_softc *sc;
    833 	struct esa_voice *vc;
    834 	bus_space_tag_t iot;
    835 	bus_space_handle_t ioh;
    836 	uint8_t status;
    837 	uint32_t pos;
    838 	uint32_t diff;
    839 	uint32_t blksize;
    840 	int i;
    841 
    842 	sc = hdl;
    843 	iot = sc->sc_iot;
    844 	ioh = sc->sc_ioh;
    845 
    846 	status = bus_space_read_1(iot, ioh, ESA_HOST_INT_STATUS);
    847 	if (status == 0xff)
    848 		return 0;
    849 
    850 	/* ack the interrupt */
    851 	bus_space_write_1(iot, ioh, ESA_HOST_INT_STATUS, status);
    852 
    853 	if (status & ESA_HV_INT_PENDING) {
    854 		uint8_t event;
    855 
    856 		printf("%s: hardware volume interrupt\n", sc->sc_dev.dv_xname);
    857 		event = bus_space_read_1(iot, ioh, ESA_HW_VOL_COUNTER_MASTER);
    858 		switch(event) {
    859 		case 0x99:
    860 		case 0xaa:
    861 		case 0x66:
    862 		case 0x88:
    863 			printf("%s: esa_intr: FIXME\n", sc->sc_dev.dv_xname);
    864 			break;
    865 		default:
    866 			printf("%s: unknown hwvol event 0x%02x\n",
    867 			    sc->sc_dev.dv_xname, event);
    868 			break;
    869 		}
    870 		bus_space_write_1(iot, ioh, ESA_HW_VOL_COUNTER_MASTER, 0x88);
    871 	}
    872 
    873 	if ((status & ESA_ASSP_INT_PENDING) == 0 ||
    874 	    (bus_space_read_1(iot, ioh,
    875 	     ESA_ASSP_CONTROL_B) & ESA_STOP_ASSP_CLOCK) != 0 ||
    876 	    (bus_space_read_1(iot, ioh,
    877 	     ESA_ASSP_HOST_INT_STATUS) & ESA_DSP2HOST_REQ_TIMER) == 0)
    878 		return 1;
    879 
    880 	bus_space_write_1(iot, ioh, ESA_ASSP_HOST_INT_STATUS,
    881 	    ESA_DSP2HOST_REQ_TIMER);
    882 
    883 	for (i = 0; i < ESA_NUM_VOICES; i++) {
    884 		vc = &sc->voice[i];
    885 
    886 		if (vc->play.active) {
    887 			pos = esa_get_pointer(sc, &vc->play) % vc->play.bufsize;
    888 			diff = (vc->play.bufsize + pos - vc->play.pos) %
    889 			    vc->play.bufsize;
    890 
    891 			vc->play.pos = pos;
    892 			vc->play.count += diff;
    893 			blksize = vc->play.blksize;
    894 
    895 			while (vc->play.count >= blksize) {
    896 				vc->play.count -= blksize;
    897 				(*vc->play.intr)(vc->play.arg);
    898 			}
    899 		}
    900 
    901 		if (vc->rec.active) {
    902 			pos = esa_get_pointer(sc, &vc->rec) % vc->rec.bufsize;
    903 			diff = (vc->rec.bufsize + pos - vc->rec.pos) %
    904 			    vc->rec.bufsize;
    905 
    906 			vc->rec.pos = pos;
    907 			vc->rec.count += diff;
    908 			blksize = vc->rec.blksize;
    909 
    910 			while (vc->rec.count >= blksize) {
    911 				vc->rec.count -= blksize;
    912 				(*vc->rec.intr)(vc->rec.arg);
    913 			}
    914 		}
    915 	}
    916 
    917 	return 1;
    918 }
    919 
    920 int
    921 esa_allocmem(struct esa_softc *sc, size_t size, size_t align,
    922 	     struct esa_dma *p)
    923 {
    924 	int error;
    925 
    926 	p->size = size;
    927 	error = bus_dmamem_alloc(sc->sc_dmat, p->size, align, 0,
    928 				 p->segs, sizeof(p->segs) / sizeof(p->segs[0]),
    929 				 &p->nsegs, BUS_DMA_NOWAIT);
    930 	if (error)
    931 		return error;
    932 
    933 	error = bus_dmamem_map(sc->sc_dmat, p->segs, p->nsegs, p->size,
    934 				&p->addr, BUS_DMA_NOWAIT | BUS_DMA_COHERENT);
    935 	if (error)
    936 		goto free;
    937 
    938 	error = bus_dmamap_create(sc->sc_dmat, p->size, 1, p->size, 0,
    939 				  BUS_DMA_NOWAIT, &p->map);
    940 	if (error)
    941 		goto unmap;
    942 
    943 	error = bus_dmamap_load(sc->sc_dmat, p->map, p->addr, p->size, NULL,
    944 				BUS_DMA_NOWAIT);
    945 	if (error)
    946 		goto destroy;
    947 
    948 	return 0;
    949 
    950 destroy:
    951 	bus_dmamap_destroy(sc->sc_dmat, p->map);
    952 unmap:
    953 	bus_dmamem_unmap(sc->sc_dmat, p->addr, p->size);
    954 free:
    955 	bus_dmamem_free(sc->sc_dmat, p->segs, p->nsegs);
    956 
    957 	return error;
    958 }
    959 
    960 int
    961 esa_freemem(struct esa_softc *sc, struct esa_dma *p)
    962 {
    963 
    964 	bus_dmamap_unload(sc->sc_dmat, p->map);
    965 	bus_dmamap_destroy(sc->sc_dmat, p->map);
    966 	bus_dmamem_unmap(sc->sc_dmat, p->addr, p->size);
    967 	bus_dmamem_free(sc->sc_dmat, p->segs, p->nsegs);
    968 
    969 	return 0;
    970 }
    971 
    972 /*
    973  * Supporting Subroutines
    974  */
    975 
    976 int
    977 esa_match(struct device *dev, struct cfdata *match, void *aux)
    978 {
    979 	struct pci_attach_args *pa;
    980 
    981 	pa = (struct pci_attach_args *)aux;
    982 	switch (PCI_VENDOR(pa->pa_id)) {
    983 	case PCI_VENDOR_ESSTECH:
    984 		switch(PCI_PRODUCT(pa->pa_id)) {
    985 		case PCI_PRODUCT_ESSTECH_ALLEGRO1:
    986 		case PCI_PRODUCT_ESSTECH_MAESTRO3:
    987 		case PCI_PRODUCT_ESSTECH_MAESTRO3_2:
    988 			return 1;
    989 		}
    990 	}
    991 
    992 	return 0;
    993 }
    994 
    995 void
    996 esa_attach(struct device *parent, struct device *self, void *aux)
    997 {
    998 	struct esa_softc *sc;
    999 	struct pci_attach_args *pa;
   1000 	pcitag_t tag;
   1001 	pci_chipset_tag_t pc;
   1002 	pci_intr_handle_t ih;
   1003 	struct esa_card_type *card;
   1004 	const char *intrstr;
   1005 	uint32_t data;
   1006 	char devinfo[256];
   1007 	int revision, len;
   1008 	int i;
   1009 
   1010 	sc = (struct esa_softc *)self;
   1011 	pa = (struct pci_attach_args *)aux;
   1012 	tag = pa->pa_tag;
   1013 	pc = pa->pa_pc;
   1014 	aprint_naive(": Audio controller\n");
   1015 
   1016 	pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo, sizeof(devinfo));
   1017 	revision = PCI_REVISION(pa->pa_class);
   1018 	aprint_normal(": %s (rev. 0x%02x)\n", devinfo, revision);
   1019 
   1020 	for (card = esa_card_types; card->pci_vendor_id; card++)
   1021 		if (PCI_VENDOR(pa->pa_id) == card->pci_vendor_id &&
   1022 		    PCI_PRODUCT(pa->pa_id) == card->pci_product_id) {
   1023 			sc->type = card->type;
   1024 			sc->delay1 = card->delay1;
   1025 			sc->delay2 = card->delay2;
   1026 			break;
   1027 		}
   1028 
   1029 	data = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
   1030 	data |= (PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MEM_ENABLE
   1031 	    | PCI_COMMAND_MASTER_ENABLE);
   1032 	pci_conf_write(pc, tag, PCI_COMMAND_STATUS_REG, data);
   1033 
   1034 	/* Map I/O register */
   1035 	if (pci_mapreg_map(pa, PCI_CBIO, PCI_MAPREG_TYPE_IO, 0,
   1036 	    &sc->sc_iot, &sc->sc_ioh, &sc->sc_iob, &sc->sc_ios)) {
   1037 		aprint_error("%s: can't map i/o space\n", sc->sc_dev.dv_xname);
   1038 		return;
   1039 	}
   1040 
   1041 	/* Initialize softc */
   1042 	sc->sc_tag = tag;
   1043 	sc->sc_pct = pc;
   1044 	sc->sc_dmat = pa->pa_dmat;
   1045 
   1046 	/* Map and establish an interrupt */
   1047 	if (pci_intr_map(pa, &ih)) {
   1048 		aprint_error("%s: can't map interrupt\n", sc->sc_dev.dv_xname);
   1049 		return;
   1050 	}
   1051 	intrstr = pci_intr_string(pc, ih);
   1052 	sc->sc_ih = pci_intr_establish(pc, ih, IPL_AUDIO, esa_intr, self);
   1053 	if (sc->sc_ih == NULL) {
   1054 		aprint_error("%s: can't establish interrupt",
   1055 		    sc->sc_dev.dv_xname);
   1056 		if (intrstr != NULL)
   1057 			aprint_normal(" at %s", intrstr);
   1058 		aprint_normal("\n");
   1059 		return;
   1060 	}
   1061 	aprint_normal("%s: interrupting at %s\n", sc->sc_dev.dv_xname, intrstr);
   1062 
   1063 	/* Power up chip */
   1064 	esa_power(sc, PCI_PMCSR_STATE_D0);
   1065 
   1066 	/* Init chip */
   1067 	if (esa_init(sc) == -1) {
   1068 		aprint_error("%s: esa_attach: unable to initialize the card\n",
   1069 		    sc->sc_dev.dv_xname);
   1070 		return;
   1071 	}
   1072 
   1073 	/* create suspend save area */
   1074 	len = sizeof(uint16_t) * (ESA_REV_B_CODE_MEMORY_LENGTH
   1075 	    + ESA_REV_B_DATA_MEMORY_LENGTH + 1);
   1076 	sc->savemem = (uint16_t *)malloc(len, M_DEVBUF, M_NOWAIT | M_ZERO);
   1077 	if (sc->savemem == NULL) {
   1078 		aprint_error("%s: unable to allocate suspend buffer\n",
   1079 		    sc->sc_dev.dv_xname);
   1080 		return;
   1081 	}
   1082 
   1083 	/*
   1084 	 * Every card I've seen has had their channels swapped with respect
   1085 	 * to the mixer. Ie:
   1086 	 *  $ mixerctl -w outputs.master=0,191
   1087 	 * Would result in the _right_ speaker being turned off.
   1088 	 *
   1089 	 * So, we will swap the left and right mixer channels to compensate
   1090 	 * for this.
   1091 	 */
   1092 	sc->codec_flags = AC97_HOST_SWAPPED_CHANNELS;
   1093 
   1094 	/* Attach AC97 host interface */
   1095 	sc->host_if.arg = self;
   1096 	sc->host_if.attach = esa_attach_codec;
   1097 	sc->host_if.read = esa_read_codec;
   1098 	sc->host_if.write = esa_write_codec;
   1099 	sc->host_if.reset = esa_reset_codec;
   1100 	sc->host_if.flags = esa_flags_codec;
   1101 
   1102 	if (ac97_attach(&sc->host_if, self) != 0)
   1103 		return;
   1104 
   1105 	/* initialize list management structures */
   1106 	sc->mixer_list.mem_addr = ESA_KDATA_MIXER_XFER0;
   1107 	sc->mixer_list.max = ESA_MAX_VIRTUAL_MIXER_CHANNELS;
   1108 	sc->adc1_list.mem_addr = ESA_KDATA_ADC1_XFER0;
   1109 	sc->adc1_list.max = ESA_MAX_VIRTUAL_ADC1_CHANNELS;
   1110 	sc->dma_list.mem_addr = ESA_KDATA_DMA_XFER0;
   1111 	sc->dma_list.max = ESA_MAX_VIRTUAL_DMA_CHANNELS;
   1112 	sc->msrc_list.mem_addr = ESA_KDATA_INSTANCE0_MINISRC;
   1113 	sc->msrc_list.max = ESA_MAX_INSTANCE_MINISRC;
   1114 
   1115 	/* initialize index maps */
   1116 	for (i = 0; i < ESA_NUM_VOICES * 2; i++) {
   1117 		sc->mixer_list.indexmap[i] = -1;
   1118 		sc->msrc_list.indexmap[i] = -1;
   1119 		sc->dma_list.indexmap[i] = -1;
   1120 		sc->adc1_list.indexmap[i] = -1;
   1121 	}
   1122 	for (i = 0; i < ESA_NUM_VOICES; i++) {
   1123 		sc->voice[i].parent = (struct device *)sc;
   1124 		sc->voice[i].index = i;
   1125 		sc->sc_audiodev[i] =
   1126 		    audio_attach_mi(&esa_hw_if, &sc->voice[i], &sc->sc_dev);
   1127 	}
   1128 
   1129 	sc->powerhook = powerhook_establish(esa_powerhook, sc);
   1130 	if (sc->powerhook == NULL)
   1131 		aprint_error("%s: WARNING: unable to establish powerhook\n",
   1132 		    sc->sc_dev.dv_xname);
   1133 
   1134 	return;
   1135 }
   1136 
   1137 int
   1138 esa_detach(struct device *self, int flags)
   1139 {
   1140 	struct esa_softc *sc;
   1141 	int i;
   1142 
   1143 	sc = (struct esa_softc *)self;
   1144 	for (i = 0; i < ESA_NUM_VOICES; i++) {
   1145 		if (sc->sc_audiodev[i] != NULL)
   1146 			config_detach(sc->sc_audiodev[i], flags);
   1147 	}
   1148 
   1149 	if (sc->sc_ih != NULL)
   1150 		pci_intr_disestablish(sc->sc_pct, sc->sc_ih);
   1151 	if (sc->sc_ios)
   1152 		bus_space_unmap(sc->sc_iot, sc->sc_ioh, sc->sc_ios);
   1153 
   1154 	free(sc->savemem, M_DEVBUF);
   1155 
   1156 	return 0;
   1157 }
   1158 
   1159 uint16_t
   1160 esa_read_assp(struct esa_softc *sc, uint16_t region, uint16_t index)
   1161 {
   1162 	uint16_t data;
   1163 	bus_space_tag_t iot;
   1164 	bus_space_handle_t ioh;
   1165 
   1166 	iot = sc->sc_iot;
   1167 	ioh = sc->sc_ioh;
   1168 	bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_TYPE,
   1169 	    region & ESA_MEMTYPE_MASK);
   1170 	bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_INDEX, index);
   1171 	data = bus_space_read_2(iot, ioh, ESA_DSP_PORT_MEMORY_DATA);
   1172 
   1173 	return data;
   1174 }
   1175 
   1176 void
   1177 esa_write_assp(struct esa_softc *sc, uint16_t region, uint16_t index,
   1178 	       uint16_t data)
   1179 {
   1180 	bus_space_tag_t iot;
   1181 	bus_space_handle_t ioh;
   1182 
   1183 	iot = sc->sc_iot;
   1184 	ioh = sc->sc_ioh;
   1185 	bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_TYPE,
   1186 	    region & ESA_MEMTYPE_MASK);
   1187 	bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_INDEX, index);
   1188 	bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_DATA, data);
   1189 
   1190 	return;
   1191 }
   1192 
   1193 int
   1194 esa_init_codec(struct esa_softc *sc)
   1195 {
   1196 	bus_space_tag_t iot;
   1197 	bus_space_handle_t ioh;
   1198 	uint32_t data;
   1199 
   1200 	iot = sc->sc_iot;
   1201 	ioh = sc->sc_ioh;
   1202 	data = bus_space_read_1(iot, ioh, ESA_CODEC_COMMAND);
   1203 
   1204 	return (data & 0x1) ? 0 : 1;
   1205 }
   1206 
   1207 int
   1208 esa_attach_codec(void *aux, struct ac97_codec_if *codec_if)
   1209 {
   1210 	struct esa_softc *sc;
   1211 
   1212 	sc = aux;
   1213 	sc->codec_if = codec_if;
   1214 
   1215 	return 0;
   1216 }
   1217 
   1218 int
   1219 esa_read_codec(void *aux, uint8_t reg, uint16_t *result)
   1220 {
   1221 	struct esa_softc *sc;
   1222 	bus_space_tag_t iot;
   1223 	bus_space_handle_t ioh;
   1224 
   1225 	sc = aux;
   1226 	iot = sc->sc_iot;
   1227 	ioh = sc->sc_ioh;
   1228 	if (esa_wait(sc))
   1229 		printf("%s: esa_read_codec: timed out\n", sc->sc_dev.dv_xname);
   1230 	bus_space_write_1(iot, ioh, ESA_CODEC_COMMAND, (reg & 0x7f) | 0x80);
   1231 	delay(50);
   1232 	if (esa_wait(sc))
   1233 		printf("%s: esa_read_codec: timed out\n", sc->sc_dev.dv_xname);
   1234 	*result = bus_space_read_2(iot, ioh, ESA_CODEC_DATA);
   1235 
   1236 	return 0;
   1237 }
   1238 
   1239 int
   1240 esa_write_codec(void *aux, uint8_t reg, uint16_t data)
   1241 {
   1242 	struct esa_softc *sc;
   1243 	bus_space_tag_t iot;
   1244 	bus_space_handle_t ioh;
   1245 
   1246 	sc = aux;
   1247 	iot = sc->sc_iot;
   1248 	ioh = sc->sc_ioh;
   1249 	if (esa_wait(sc)) {
   1250 		printf("%s: esa_write_codec: timed out\n", sc->sc_dev.dv_xname);
   1251 		return -1;
   1252 	}
   1253 	bus_space_write_2(iot, ioh, ESA_CODEC_DATA, data);
   1254 	bus_space_write_1(iot, ioh, ESA_CODEC_COMMAND, reg & 0x7f);
   1255 	delay(50);
   1256 
   1257 	return 0;
   1258 }
   1259 
   1260 int
   1261 esa_reset_codec(void *aux)
   1262 {
   1263 
   1264 	return 0;
   1265 }
   1266 
   1267 enum ac97_host_flags
   1268 esa_flags_codec(void *aux)
   1269 {
   1270 	struct esa_softc *sc;
   1271 
   1272 	sc = aux;
   1273 	return sc->codec_flags;
   1274 }
   1275 
   1276 int
   1277 esa_wait(struct esa_softc *sc)
   1278 {
   1279 	int i, val;
   1280 	bus_space_tag_t iot;
   1281 	bus_space_handle_t ioh;
   1282 
   1283 	iot = sc->sc_iot;
   1284 	ioh = sc->sc_ioh;
   1285 	for (i = 0; i < 20; i++) {
   1286 		val = bus_space_read_1(iot, ioh, ESA_CODEC_STATUS);
   1287 		if ((val & 1) == 0)
   1288 			return 0;
   1289 		delay(2);
   1290 	}
   1291 
   1292 	return -1;
   1293 }
   1294 
   1295 int
   1296 esa_init(struct esa_softc *sc)
   1297 {
   1298 	struct esa_voice *vc;
   1299 	bus_space_tag_t iot;
   1300 	bus_space_handle_t ioh;
   1301 	pcitag_t tag;
   1302 	pci_chipset_tag_t pc;
   1303 	uint32_t data, i, size;
   1304 	uint8_t reset_state;
   1305 	int data_bytes;
   1306 
   1307 	iot = sc->sc_iot;
   1308 	ioh = sc->sc_ioh;
   1309 	tag = sc->sc_tag;
   1310 	pc = sc->sc_pct;
   1311 	data_bytes = (((ESA_MINISRC_TMP_BUFFER_SIZE & ~1) +
   1312 	    (ESA_MINISRC_IN_BUFFER_SIZE & ~1) +
   1313 	    (ESA_MINISRC_OUT_BUFFER_SIZE & ~1) + 4) + 255) & ~255;
   1314 
   1315 	/* Disable legacy emulation */
   1316 	data = pci_conf_read(pc, tag, PCI_LEGACY_AUDIO_CTRL);
   1317 	data |= DISABLE_LEGACY;
   1318 	pci_conf_write(pc, tag, PCI_LEGACY_AUDIO_CTRL, data);
   1319 
   1320 	esa_config(sc);
   1321 
   1322 	reset_state = esa_assp_halt(sc);
   1323 
   1324 	esa_init_codec(sc);
   1325 	esa_codec_reset(sc);
   1326 
   1327 	/* Zero kernel and mixer data */
   1328 	size = ESA_REV_B_DATA_MEMORY_UNIT_LENGTH * ESA_NUM_UNITS_KERNEL_DATA;
   1329 	for (i = 0; i < size / 2; i++) {
   1330 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
   1331 		    ESA_KDATA_BASE_ADDR + i, 0);
   1332 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
   1333 		    ESA_KDATA_BASE_ADDR2 + i, 0);
   1334 	}
   1335 
   1336 	/* Init DMA pointer */
   1337 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_CURRENT_DMA,
   1338 	    ESA_KDATA_DMA_XFER0);
   1339 
   1340 	/* Write kernel code into memory */
   1341 	size = sizeof(esa_assp_kernel_image);
   1342 	for (i = 0; i < size / 2; i++)
   1343 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE,
   1344 		    ESA_REV_B_CODE_MEMORY_BEGIN + i, esa_assp_kernel_image[i]);
   1345 
   1346 	size = sizeof(esa_assp_minisrc_image);
   1347 	for (i = 0; i < size / 2; i++)
   1348 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE, 0x400 + i,
   1349 		    esa_assp_minisrc_image[i]);
   1350 
   1351 	/* Write the coefficients for the low pass filter */
   1352 	size = sizeof(esa_minisrc_lpf_image);
   1353 	for (i = 0; i < size / 2; i++)
   1354 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE,
   1355 		    0x400 + ESA_MINISRC_COEF_LOC + i, esa_minisrc_lpf_image[i]);
   1356 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE,
   1357 	    0x400 + ESA_MINISRC_COEF_LOC + size, 0x8000);
   1358 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_TASK0, 0x400);
   1359 	/* Init the mixer number */
   1360 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
   1361 	     ESA_KDATA_MIXER_TASK_NUMBER, 0);
   1362 	/* Extreme kernel master volume */
   1363 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
   1364 	    ESA_KDATA_DAC_LEFT_VOLUME, ESA_ARB_VOLUME);
   1365 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
   1366 	    ESA_KDATA_DAC_RIGHT_VOLUME, ESA_ARB_VOLUME);
   1367 
   1368 	if (esa_amp_enable(sc))
   1369 		return -1;
   1370 
   1371 	/* Zero entire DAC/ADC area */
   1372 	for (i = 0x1100; i < 0x1c00; i++)
   1373 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, i, 0);
   1374 
   1375 	/* set some sane defaults */
   1376 	for (i = 0; i < ESA_NUM_VOICES; i++) {
   1377 		vc = &sc->voice[i];
   1378 		vc->play.data_offset = ESA_DAC_DATA + (data_bytes * i);
   1379 		vc->rec.data_offset = ESA_DAC_DATA + (data_bytes * i * 2);
   1380 	}
   1381 
   1382 	esa_enable_interrupts(sc);
   1383 
   1384 	bus_space_write_1(iot, ioh, ESA_DSP_PORT_CONTROL_REG_B,
   1385 	    reset_state | ESA_REGB_ENABLE_RESET);
   1386 
   1387 	return 0;
   1388 }
   1389 
   1390 void
   1391 esa_config(struct esa_softc *sc)
   1392 {
   1393 	bus_space_tag_t iot;
   1394 	bus_space_handle_t ioh;
   1395 	pcitag_t tag;
   1396 	pci_chipset_tag_t pc;
   1397 	uint32_t data;
   1398 
   1399 	iot = sc->sc_iot;
   1400 	ioh = sc->sc_ioh;
   1401 	tag = sc->sc_tag;
   1402 	pc = sc->sc_pct;
   1403 
   1404 	data = pci_conf_read(pc, tag, ESA_PCI_ALLEGRO_CONFIG);
   1405 	data &= ESA_REDUCED_DEBOUNCE;
   1406 	data |= ESA_PM_CTRL_ENABLE | ESA_CLK_DIV_BY_49 | ESA_USE_PCI_TIMING;
   1407 	pci_conf_write(pc, tag, ESA_PCI_ALLEGRO_CONFIG, data);
   1408 
   1409 	bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_B, ESA_RESET_ASSP);
   1410 	data = pci_conf_read(pc, tag, ESA_PCI_ALLEGRO_CONFIG);
   1411 	data &= ~ESA_INT_CLK_SELECT;
   1412 	if (sc->type == ESS_MAESTRO3) {
   1413 		data &= ~ESA_INT_CLK_MULT_ENABLE;
   1414 		data |= ESA_INT_CLK_SRC_NOT_PCI;
   1415 	}
   1416 	data &= ~(ESA_CLK_MULT_MODE_SELECT | ESA_CLK_MULT_MODE_SELECT_2);
   1417 	pci_conf_write(pc, tag, ESA_PCI_ALLEGRO_CONFIG, data);
   1418 
   1419 	if (sc->type == ESS_ALLEGRO1) {
   1420 		data = pci_conf_read(pc, tag, ESA_PCI_USER_CONFIG);
   1421 		data |= ESA_IN_CLK_12MHZ_SELECT;
   1422 		pci_conf_write(pc, tag, ESA_PCI_USER_CONFIG, data);
   1423 	}
   1424 
   1425 	data = bus_space_read_1(iot, ioh, ESA_ASSP_CONTROL_A);
   1426 	data &= ~(ESA_DSP_CLK_36MHZ_SELECT | ESA_ASSP_CLK_49MHZ_SELECT);
   1427 	data |= ESA_ASSP_CLK_49MHZ_SELECT;	/* XXX: Assumes 49MHz DSP */
   1428 	data |= ESA_ASSP_0_WS_ENABLE;
   1429 	bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_A, data);
   1430 
   1431 	bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_B, ESA_RUN_ASSP);
   1432 
   1433 	return;
   1434 }
   1435 
   1436 uint8_t
   1437 esa_assp_halt(struct esa_softc *sc)
   1438 {
   1439 	bus_space_tag_t iot;
   1440 	bus_space_handle_t ioh;
   1441 	uint8_t data, reset_state;
   1442 
   1443 	iot = sc->sc_iot;
   1444 	ioh = sc->sc_ioh;
   1445 	data = bus_space_read_1(iot, ioh, ESA_DSP_PORT_CONTROL_REG_B);
   1446 	reset_state = data & ~ESA_REGB_STOP_CLOCK;
   1447 	delay(10000);		/* XXX use tsleep */
   1448 	bus_space_write_1(iot, ioh, ESA_DSP_PORT_CONTROL_REG_B,
   1449 			reset_state & ~ESA_REGB_ENABLE_RESET);
   1450 	delay(10000);		/* XXX use tsleep */
   1451 
   1452 	return reset_state;
   1453 }
   1454 
   1455 void
   1456 esa_codec_reset(struct esa_softc *sc)
   1457 {
   1458 	bus_space_tag_t iot;
   1459 	bus_space_handle_t ioh;
   1460 	uint16_t data, dir;
   1461 	int retry;
   1462 
   1463 	iot = sc->sc_iot;
   1464 	ioh = sc->sc_ioh;
   1465 	retry = 0;
   1466 	do {
   1467 		data = bus_space_read_2(iot, ioh, ESA_GPIO_DIRECTION);
   1468 		dir = data | 0x10; /* assuming pci bus master? */
   1469 
   1470 		/* remote codec config */
   1471 		data = bus_space_read_2(iot, ioh, ESA_RING_BUS_CTRL_B);
   1472 		bus_space_write_2(iot, ioh, ESA_RING_BUS_CTRL_B,
   1473 		    data & ~ESA_SECOND_CODEC_ID_MASK);
   1474 		data = bus_space_read_2(iot, ioh, ESA_SDO_OUT_DEST_CTRL);
   1475 		bus_space_write_2(iot, ioh, ESA_SDO_OUT_DEST_CTRL,
   1476 		    data & ~ESA_COMMAND_ADDR_OUT);
   1477 		data = bus_space_read_2(iot, ioh, ESA_SDO_IN_DEST_CTRL);
   1478 		bus_space_write_2(iot, ioh, ESA_SDO_IN_DEST_CTRL,
   1479 		    data & ~ESA_STATUS_ADDR_IN);
   1480 
   1481 		bus_space_write_2(iot, ioh, ESA_RING_BUS_CTRL_A,
   1482 				  ESA_IO_SRAM_ENABLE);
   1483 		delay(20);
   1484 
   1485 		bus_space_write_2(iot, ioh, ESA_GPIO_DIRECTION,
   1486 		    dir & ~ESA_GPO_PRIMARY_AC97);
   1487 		bus_space_write_2(iot, ioh, ESA_GPIO_MASK,
   1488 				  ~ESA_GPO_PRIMARY_AC97);
   1489 		bus_space_write_2(iot, ioh, ESA_GPIO_DATA, 0);
   1490 		bus_space_write_2(iot, ioh, ESA_GPIO_DIRECTION,
   1491 		    dir | ESA_GPO_PRIMARY_AC97);
   1492 		delay(sc->delay1 * 1000);
   1493 		bus_space_write_2(iot, ioh, ESA_GPIO_DATA,
   1494 				  ESA_GPO_PRIMARY_AC97);
   1495 		delay(5);
   1496 		bus_space_write_2(iot, ioh, ESA_RING_BUS_CTRL_A,
   1497 		    ESA_IO_SRAM_ENABLE | ESA_SERIAL_AC_LINK_ENABLE);
   1498 		bus_space_write_2(iot, ioh, ESA_GPIO_MASK, ~0);
   1499 		delay(sc->delay2 * 1000);
   1500 
   1501 		esa_read_codec(sc, 0x7c, &data);
   1502 		if ((data == 0) || (data == 0xffff)) {
   1503 			retry++;
   1504 			if (retry > 3) {
   1505 				printf("%s: esa_codec_reset: failed\n",
   1506 				    sc->sc_dev.dv_xname);
   1507 				break;
   1508 			}
   1509 			printf("%s: esa_codec_reset: retrying\n",
   1510 			    sc->sc_dev.dv_xname);
   1511 		} else
   1512 			retry = 0;
   1513 	} while (retry);
   1514 
   1515 	return;
   1516 }
   1517 
   1518 int
   1519 esa_amp_enable(struct esa_softc *sc)
   1520 {
   1521 	bus_space_tag_t iot;
   1522 	bus_space_handle_t ioh;
   1523 	uint32_t gpo, polarity_port, polarity;
   1524 	uint16_t data;
   1525 
   1526 	iot = sc->sc_iot;
   1527 	ioh = sc->sc_ioh;
   1528 	switch (sc->type) {
   1529 	case ESS_ALLEGRO1:
   1530 		polarity_port = 0x1800;
   1531 		break;
   1532 	case ESS_MAESTRO3:
   1533 		polarity_port = 0x1100;
   1534 		break;
   1535 	default:
   1536 		printf("%s: esa_amp_enable: Unknown chip type!!!\n",
   1537 		    sc->sc_dev.dv_xname);
   1538 		return 1;
   1539 	}
   1540 
   1541 	gpo = (polarity_port >> 8) & 0x0f;
   1542 	polarity = polarity_port >> 12;
   1543 	polarity = !polarity;	/* Enable */
   1544 	polarity = polarity << gpo;
   1545 	gpo = 1 << gpo;
   1546 	bus_space_write_2(iot, ioh, ESA_GPIO_MASK, ~gpo);
   1547 	data = bus_space_read_2(iot, ioh, ESA_GPIO_DIRECTION);
   1548 	bus_space_write_2(iot, ioh, ESA_GPIO_DIRECTION, data | gpo);
   1549 	data = ESA_GPO_SECONDARY_AC97 | ESA_GPO_PRIMARY_AC97 | polarity;
   1550 	bus_space_write_2(iot, ioh, ESA_GPIO_DATA, data);
   1551 	bus_space_write_2(iot, ioh, ESA_GPIO_MASK, ~0);
   1552 
   1553 	return 0;
   1554 }
   1555 
   1556 void
   1557 esa_enable_interrupts(struct esa_softc *sc)
   1558 {
   1559 	bus_space_tag_t iot;
   1560 	bus_space_handle_t ioh;
   1561 	uint8_t data;
   1562 
   1563 	iot = sc->sc_iot;
   1564 	ioh = sc->sc_ioh;
   1565 	bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL,
   1566 	    ESA_ASSP_INT_ENABLE | ESA_HV_INT_ENABLE);
   1567 	data = bus_space_read_1(iot, ioh, ESA_ASSP_CONTROL_C);
   1568 	bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_C,
   1569 	    data | ESA_ASSP_HOST_INT_ENABLE);
   1570 }
   1571 
   1572 /*
   1573  * List management
   1574  */
   1575 int
   1576 esa_add_list(struct esa_voice *vc, struct esa_list *el,
   1577 	     uint16_t val, int index)
   1578 {
   1579 	struct esa_softc *sc;
   1580 
   1581 	sc = (struct esa_softc *)vc->parent;
   1582 	el->indexmap[index] = el->currlen;
   1583 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
   1584 		       el->mem_addr + el->currlen,
   1585 		       val);
   1586 
   1587 	return el->currlen++;
   1588 }
   1589 
   1590 void
   1591 esa_remove_list(struct esa_voice *vc, struct esa_list *el, int index)
   1592 {
   1593 	struct esa_softc *sc;
   1594 	uint16_t val;
   1595 	int lastindex;
   1596 	int vindex;
   1597 	int i;
   1598 
   1599 	sc = (struct esa_softc *)vc->parent;
   1600 	lastindex = el->currlen - 1;
   1601 	vindex = el->indexmap[index];
   1602 
   1603 	/* reset our virtual index */
   1604 	el->indexmap[index] = -1;
   1605 
   1606 	if (vindex != lastindex) {
   1607 		val = esa_read_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
   1608 				    el->mem_addr + lastindex);
   1609 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
   1610 			       el->mem_addr + vindex,
   1611 			       val);
   1612 		for (i = 0; i < ESA_NUM_VOICES * 2; i++)
   1613 			if (el->indexmap[i] == lastindex)
   1614 				break;
   1615 		if (i >= ESA_NUM_VOICES * 2)
   1616 			printf("%s: esa_remove_list: invalid task index\n",
   1617 			       sc->sc_dev.dv_xname);
   1618 		else
   1619 			el->indexmap[i] = vindex;
   1620 	}
   1621 
   1622 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA,
   1623 		       el->mem_addr + lastindex, 0);
   1624 	el->currlen--;
   1625 
   1626 	return;
   1627 }
   1628 
   1629 int
   1630 esa_power(struct esa_softc *sc, int state)
   1631 {
   1632 	pcitag_t tag;
   1633 	pci_chipset_tag_t pc;
   1634 	pcireg_t data;
   1635 	int pmcapreg;
   1636 
   1637 	tag = sc->sc_tag;
   1638 	 pc = sc->sc_pct;
   1639 	if (pci_get_capability(pc, tag, PCI_CAP_PWRMGMT, &pmcapreg, 0)) {
   1640 		data = pci_conf_read(pc, tag, pmcapreg + PCI_PMCSR);
   1641 		if ((data & PCI_PMCSR_STATE_MASK) != state)
   1642 			pci_conf_write(pc, tag, pmcapreg + PCI_PMCSR, state);
   1643 	}
   1644 
   1645 	return 0;
   1646 }
   1647 
   1648 void
   1649 esa_powerhook(int why, void *hdl)
   1650 {
   1651 	struct esa_softc *sc;
   1652 
   1653 	sc = (struct esa_softc *)hdl;
   1654 	switch (why) {
   1655 	case PWR_SUSPEND:
   1656 	case PWR_STANDBY:
   1657 		esa_suspend(sc);
   1658 		break;
   1659 	case PWR_RESUME:
   1660 		esa_resume(sc);
   1661 		sc->codec_if->vtbl->restore_ports(sc->codec_if);
   1662 		break;
   1663 	}
   1664 }
   1665 
   1666 int
   1667 esa_suspend(struct esa_softc *sc)
   1668 {
   1669 	bus_space_tag_t iot;
   1670 	bus_space_handle_t ioh;
   1671 	int i, index;
   1672 
   1673 	iot = sc->sc_iot;
   1674 	ioh = sc->sc_ioh;
   1675 	index = 0;
   1676 
   1677 	bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL, 0);
   1678 	bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_C, 0);
   1679 
   1680 	esa_assp_halt(sc);
   1681 
   1682 	/* Save ASSP state */
   1683 	for (i = ESA_REV_B_CODE_MEMORY_BEGIN; i <= ESA_REV_B_CODE_MEMORY_END;
   1684 	    i++)
   1685 		sc->savemem[index++] = esa_read_assp(sc,
   1686 		    ESA_MEMTYPE_INTERNAL_CODE, i);
   1687 	for (i = ESA_REV_B_DATA_MEMORY_BEGIN; i <= ESA_REV_B_DATA_MEMORY_END;
   1688 	    i++)
   1689 		sc->savemem[index++] = esa_read_assp(sc,
   1690 		    ESA_MEMTYPE_INTERNAL_DATA, i);
   1691 
   1692 	esa_power(sc, PCI_PMCSR_STATE_D3);
   1693 
   1694 	return 0;
   1695 }
   1696 
   1697 int
   1698 esa_resume(struct esa_softc *sc)
   1699 {
   1700 	bus_space_tag_t iot;
   1701 	bus_space_handle_t ioh;
   1702 	int i, index;
   1703 	uint8_t reset_state;
   1704 
   1705 	iot = sc->sc_iot;
   1706 	ioh = sc->sc_ioh;
   1707 	index = 0;
   1708 
   1709 	esa_power(sc, PCI_PMCSR_STATE_D0);
   1710 	delay(10000);
   1711 
   1712 	esa_config(sc);
   1713 
   1714 	reset_state = esa_assp_halt(sc);
   1715 
   1716 	esa_codec_reset(sc);
   1717 
   1718 	/* restore ASSP */
   1719 	for (i = ESA_REV_B_CODE_MEMORY_BEGIN; i <= ESA_REV_B_CODE_MEMORY_END;
   1720 	    i++)
   1721 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE, i,
   1722 		    sc->savemem[index++]);
   1723 	for (i = ESA_REV_B_DATA_MEMORY_BEGIN; i <= ESA_REV_B_DATA_MEMORY_END;
   1724 	    i++)
   1725 		esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, i,
   1726 		    sc->savemem[index++]);
   1727 
   1728 	esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_DMA_ACTIVE, 0);
   1729 	bus_space_write_1(iot, ioh, ESA_DSP_PORT_CONTROL_REG_B,
   1730 	    reset_state | ESA_REGB_ENABLE_RESET);
   1731 
   1732 	esa_enable_interrupts(sc);
   1733 	esa_amp_enable(sc);
   1734 
   1735 	return 0;
   1736 }
   1737 
   1738 uint32_t
   1739 esa_get_pointer(struct esa_softc *sc, struct esa_channel *ch)
   1740 {
   1741 	uint16_t hi, lo;
   1742 	uint32_t addr;
   1743 	int data_offset;
   1744 
   1745 	data_offset = ch->data_offset;
   1746 	hi = esa_read_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, data_offset +
   1747 	    ESA_CDATA_HOST_SRC_CURRENTH);
   1748 	lo = esa_read_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, data_offset +
   1749 	    ESA_CDATA_HOST_SRC_CURRENTL);
   1750 
   1751 	addr = lo | ((uint32_t)hi << 16);
   1752 	return (addr - ch->start);
   1753 }
   1754 
   1755 paddr_t
   1756 esa_mappage(void *addr, void *mem, off_t off, int prot)
   1757 {
   1758 	struct esa_voice *vc;
   1759 	struct esa_softc *sc;
   1760 	struct esa_dma *p;
   1761 
   1762 	vc = addr;
   1763 	sc = (struct esa_softc *)vc->parent;
   1764 	if (off < 0)
   1765 		return -1;
   1766 	for (p = vc->dma; p && KERNADDR(p) != mem; p = p->next)
   1767 		continue;
   1768 	if (p == NULL)
   1769 		return -1;
   1770 	return bus_dmamem_mmap(sc->sc_dmat, p->segs, p->nsegs,
   1771 			       off, prot, BUS_DMA_WAITOK);
   1772 }
   1773