xref: /dragonfly/sys/dev/sound/pci/neomagic.c (revision f02303f9)
1 /*-
2  * Copyright (c) 1999 Cameron Grant <cg@freebsd.org>
3  * All rights reserved.
4  *
5  * Derived from the public domain Linux driver
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHERIN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THEPOSSIBILITY OF
26  * SUCH DAMAGE.
27  *
28  * $FreeBSD: src/sys/dev/sound/pci/neomagic.c,v 1.34.2.1 2005/12/30 19:55:53 netchild Exp $
29  * $DragonFly: src/sys/dev/sound/pci/neomagic.c,v 1.7 2007/01/04 21:47:02 corecode Exp $
30  */
31 
32 #include <dev/sound/pcm/sound.h>
33 #include <dev/sound/pcm/ac97.h>
34 #include <dev/sound/pci/neomagic.h>
35 #include <dev/sound/pci/neomagic-coeff.h>
36 
37 #include <bus/pci/pcireg.h>
38 #include <bus/pci/pcivar.h>
39 
40 SND_DECLARE_FILE("$DragonFly: src/sys/dev/sound/pci/neomagic.c,v 1.7 2007/01/04 21:47:02 corecode Exp $");
41 
42 /* -------------------------------------------------------------------- */
43 
44 #define	NM_BUFFSIZE	16384
45 
46 #define NM256AV_PCI_ID 	0x800510c8
47 #define NM256ZX_PCI_ID 	0x800610c8
48 
49 struct sc_info;
50 
51 /* channel registers */
52 struct sc_chinfo {
53 	int active, spd, dir, fmt;
54 	u_int32_t blksize, wmark;
55 	struct snd_dbuf *buffer;
56 	struct pcm_channel *channel;
57 	struct sc_info *parent;
58 };
59 
60 /* device private data */
61 struct sc_info {
62 	device_t	dev;
63 	u_int32_t 	type;
64 
65 	struct resource *reg, *irq, *buf;
66 	int		regid, irqid, bufid;
67 	void		*ih;
68 
69 	u_int32_t 	ac97_base, ac97_status, ac97_busy;
70 	u_int32_t	buftop, pbuf, rbuf, cbuf, acbuf;
71 	u_int32_t	playint, recint, misc1int, misc2int;
72 	u_int32_t	irsz, badintr;
73 
74 	struct sc_chinfo pch, rch;
75 };
76 
77 /* -------------------------------------------------------------------- */
78 
79 /*
80  * prototypes
81  */
82 
83 /* stuff */
84 static int 	 nm_loadcoeff(struct sc_info *sc, int dir, int num);
85 static int	 nm_setch(struct sc_chinfo *ch);
86 static int       nm_init(struct sc_info *);
87 static void      nm_intr(void *);
88 
89 /* talk to the card */
90 static u_int32_t nm_rd(struct sc_info *, int, int);
91 static void 	 nm_wr(struct sc_info *, int, u_int32_t, int);
92 static u_int32_t nm_rdbuf(struct sc_info *, int, int);
93 static void 	 nm_wrbuf(struct sc_info *, int, u_int32_t, int);
94 
95 static u_int32_t badcards[] = {
96 	0x0007103c,
97 	0x008f1028,
98 	0x00dd1014,
99 	0x8005110a,
100 };
101 #define NUM_BADCARDS (sizeof(badcards) / sizeof(u_int32_t))
102 
103 /* The actual rates supported by the card. */
104 static int samplerates[9] = {
105 	8000,
106 	11025,
107 	16000,
108 	22050,
109 	24000,
110 	32000,
111 	44100,
112 	48000,
113 	99999999
114 };
115 
116 /* -------------------------------------------------------------------- */
117 
118 static u_int32_t nm_fmt[] = {
119 	AFMT_U8,
120 	AFMT_STEREO | AFMT_U8,
121 	AFMT_S16_LE,
122 	AFMT_STEREO | AFMT_S16_LE,
123 	0
124 };
125 static struct pcmchan_caps nm_caps = {4000, 48000, nm_fmt, 0};
126 
127 /* -------------------------------------------------------------------- */
128 
129 /* Hardware */
130 static u_int32_t
131 nm_rd(struct sc_info *sc, int regno, int size)
132 {
133 	bus_space_tag_t st = rman_get_bustag(sc->reg);
134 	bus_space_handle_t sh = rman_get_bushandle(sc->reg);
135 
136 	switch (size) {
137 	case 1:
138 		return bus_space_read_1(st, sh, regno);
139 	case 2:
140 		return bus_space_read_2(st, sh, regno);
141 	case 4:
142 		return bus_space_read_4(st, sh, regno);
143 	default:
144 		return 0xffffffff;
145 	}
146 }
147 
148 static void
149 nm_wr(struct sc_info *sc, int regno, u_int32_t data, int size)
150 {
151 	bus_space_tag_t st = rman_get_bustag(sc->reg);
152 	bus_space_handle_t sh = rman_get_bushandle(sc->reg);
153 
154 	switch (size) {
155 	case 1:
156 		bus_space_write_1(st, sh, regno, data);
157 		break;
158 	case 2:
159 		bus_space_write_2(st, sh, regno, data);
160 		break;
161 	case 4:
162 		bus_space_write_4(st, sh, regno, data);
163 		break;
164 	}
165 }
166 
167 static u_int32_t
168 nm_rdbuf(struct sc_info *sc, int regno, int size)
169 {
170 	bus_space_tag_t st = rman_get_bustag(sc->buf);
171 	bus_space_handle_t sh = rman_get_bushandle(sc->buf);
172 
173 	switch (size) {
174 	case 1:
175 		return bus_space_read_1(st, sh, regno);
176 	case 2:
177 		return bus_space_read_2(st, sh, regno);
178 	case 4:
179 		return bus_space_read_4(st, sh, regno);
180 	default:
181 		return 0xffffffff;
182 	}
183 }
184 
185 static void
186 nm_wrbuf(struct sc_info *sc, int regno, u_int32_t data, int size)
187 {
188 	bus_space_tag_t st = rman_get_bustag(sc->buf);
189 	bus_space_handle_t sh = rman_get_bushandle(sc->buf);
190 
191 	switch (size) {
192 	case 1:
193 		bus_space_write_1(st, sh, regno, data);
194 		break;
195 	case 2:
196 		bus_space_write_2(st, sh, regno, data);
197 		break;
198 	case 4:
199 		bus_space_write_4(st, sh, regno, data);
200 		break;
201 	}
202 }
203 
204 /* -------------------------------------------------------------------- */
205 /* ac97 codec */
206 static int
207 nm_waitcd(struct sc_info *sc)
208 {
209 	int cnt = 10;
210 	int fail = 1;
211 
212 	while (cnt-- > 0) {
213 		if (nm_rd(sc, sc->ac97_status, 2) & sc->ac97_busy) {
214 			DELAY(100);
215 		} else {
216 			fail = 0;
217 			break;
218 		}
219 	}
220 	return (fail);
221 }
222 
223 static u_int32_t
224 nm_initcd(kobj_t obj, void *devinfo)
225 {
226 	struct sc_info *sc = (struct sc_info *)devinfo;
227 
228 	nm_wr(sc, 0x6c0, 0x01, 1);
229 #if 0
230 	/*
231 	 * The following code-line may cause a hang for some chipsets, see
232 	 * PR 56617.
233 	 * In case of a bugreport without this line have a look at the PR and
234 	 * conditionize the code-line based upon the specific version of
235 	 * the chip.
236 	 */
237 	nm_wr(sc, 0x6cc, 0x87, 1);
238 #endif
239 	nm_wr(sc, 0x6cc, 0x80, 1);
240 	nm_wr(sc, 0x6cc, 0x00, 1);
241 	return 1;
242 }
243 
244 static int
245 nm_rdcd(kobj_t obj, void *devinfo, int regno)
246 {
247 	struct sc_info *sc = (struct sc_info *)devinfo;
248 	u_int32_t x;
249 
250 	if (!nm_waitcd(sc)) {
251 		x = nm_rd(sc, sc->ac97_base + regno, 2);
252 		DELAY(1000);
253 		return x;
254 	} else {
255 		device_printf(sc->dev, "ac97 codec not ready\n");
256 		return -1;
257 	}
258 }
259 
260 static int
261 nm_wrcd(kobj_t obj, void *devinfo, int regno, u_int32_t data)
262 {
263 	struct sc_info *sc = (struct sc_info *)devinfo;
264 	int cnt = 3;
265 
266 	if (!nm_waitcd(sc)) {
267 		while (cnt-- > 0) {
268 			nm_wr(sc, sc->ac97_base + regno, data, 2);
269 			if (!nm_waitcd(sc)) {
270 				DELAY(1000);
271 				return 0;
272 			}
273 		}
274 	}
275 	device_printf(sc->dev, "ac97 codec not ready\n");
276 	return -1;
277 }
278 
279 static kobj_method_t nm_ac97_methods[] = {
280     	KOBJMETHOD(ac97_init,		nm_initcd),
281     	KOBJMETHOD(ac97_read,		nm_rdcd),
282     	KOBJMETHOD(ac97_write,		nm_wrcd),
283 	{ 0, 0 }
284 };
285 AC97_DECLARE(nm_ac97);
286 
287 /* -------------------------------------------------------------------- */
288 
289 static void
290 nm_ackint(struct sc_info *sc, u_int32_t num)
291 {
292 	if (sc->type == NM256AV_PCI_ID) {
293 		nm_wr(sc, NM_INT_REG, num << 1, 2);
294 	} else if (sc->type == NM256ZX_PCI_ID) {
295 		nm_wr(sc, NM_INT_REG, num, 4);
296 	}
297 }
298 
299 static int
300 nm_loadcoeff(struct sc_info *sc, int dir, int num)
301 {
302 	int ofs, sz, i;
303 	u_int32_t addr;
304 
305 	addr = (dir == PCMDIR_PLAY)? 0x01c : 0x21c;
306 	if (dir == PCMDIR_REC)
307 		num += 8;
308 	sz = coefficientSizes[num];
309 	ofs = 0;
310 	while (num-- > 0)
311 		ofs+= coefficientSizes[num];
312 	for (i = 0; i < sz; i++)
313 		nm_wrbuf(sc, sc->cbuf + i, coefficients[ofs + i], 1);
314 	nm_wr(sc, addr, sc->cbuf, 4);
315 	if (dir == PCMDIR_PLAY)
316 		sz--;
317 	nm_wr(sc, addr + 4, sc->cbuf + sz, 4);
318 	return 0;
319 }
320 
321 static int
322 nm_setch(struct sc_chinfo *ch)
323 {
324 	struct sc_info *sc = ch->parent;
325 	u_int32_t base;
326 	u_int8_t x;
327 
328 	for (x = 0; x < 8; x++)
329 		if (ch->spd < (samplerates[x] + samplerates[x + 1]) / 2)
330 			break;
331 
332 	if (x == 8) return 1;
333 
334 	ch->spd = samplerates[x];
335 	nm_loadcoeff(sc, ch->dir, x);
336 
337 	x <<= 4;
338 	x &= NM_RATE_MASK;
339 	if (ch->fmt & AFMT_16BIT) x |= NM_RATE_BITS_16;
340 	if (ch->fmt & AFMT_STEREO) x |= NM_RATE_STEREO;
341 
342 	base = (ch->dir == PCMDIR_PLAY)? NM_PLAYBACK_REG_OFFSET : NM_RECORD_REG_OFFSET;
343 	nm_wr(sc, base + NM_RATE_REG_OFFSET, x, 1);
344 	return 0;
345 }
346 
347 /* channel interface */
348 static void *
349 nmchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir)
350 {
351 	struct sc_info *sc = devinfo;
352 	struct sc_chinfo *ch;
353 	u_int32_t chnbuf;
354 
355 	chnbuf = (dir == PCMDIR_PLAY)? sc->pbuf : sc->rbuf;
356 	ch = (dir == PCMDIR_PLAY)? &sc->pch : &sc->rch;
357 	ch->active = 0;
358 	ch->blksize = 0;
359 	ch->wmark = 0;
360 	ch->buffer = b;
361 	sndbuf_setup(ch->buffer, (u_int8_t *)rman_get_virtual(sc->buf) + chnbuf, NM_BUFFSIZE);
362 	if (bootverbose)
363 		device_printf(sc->dev, "%s buf %p\n", (dir == PCMDIR_PLAY)?
364 			      "play" : "rec", sndbuf_getbuf(ch->buffer));
365 	ch->parent = sc;
366 	ch->channel = c;
367 	ch->dir = dir;
368 	return ch;
369 }
370 
371 static int
372 nmchan_free(kobj_t obj, void *data)
373 {
374 	return 0;
375 }
376 
377 static int
378 nmchan_setformat(kobj_t obj, void *data, u_int32_t format)
379 {
380 	struct sc_chinfo *ch = data;
381 
382 	ch->fmt = format;
383 	return nm_setch(ch);
384 }
385 
386 static int
387 nmchan_setspeed(kobj_t obj, void *data, u_int32_t speed)
388 {
389 	struct sc_chinfo *ch = data;
390 
391 	ch->spd = speed;
392 	return nm_setch(ch)? 0 : ch->spd;
393 }
394 
395 static int
396 nmchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize)
397 {
398 	struct sc_chinfo *ch = data;
399 
400 	ch->blksize = blocksize;
401 
402 	return blocksize;
403 }
404 
405 static int
406 nmchan_trigger(kobj_t obj, void *data, int go)
407 {
408 	struct sc_chinfo *ch = data;
409 	struct sc_info *sc = ch->parent;
410 	int ssz;
411 
412 	if (go == PCMTRIG_EMLDMAWR || go == PCMTRIG_EMLDMARD)
413 		return 0;
414 
415 	ssz = (ch->fmt & AFMT_16BIT)? 2 : 1;
416 	if (ch->fmt & AFMT_STEREO)
417 		ssz <<= 1;
418 
419 	if (ch->dir == PCMDIR_PLAY) {
420 		if (go == PCMTRIG_START) {
421 			ch->active = 1;
422 			ch->wmark = ch->blksize;
423 			nm_wr(sc, NM_PBUFFER_START, sc->pbuf, 4);
424 			nm_wr(sc, NM_PBUFFER_END, sc->pbuf + NM_BUFFSIZE - ssz, 4);
425 			nm_wr(sc, NM_PBUFFER_CURRP, sc->pbuf, 4);
426 			nm_wr(sc, NM_PBUFFER_WMARK, sc->pbuf + ch->wmark, 4);
427 			nm_wr(sc, NM_PLAYBACK_ENABLE_REG, NM_PLAYBACK_FREERUN |
428 				NM_PLAYBACK_ENABLE_FLAG, 1);
429 			nm_wr(sc, NM_AUDIO_MUTE_REG, 0, 2);
430 		} else {
431 			ch->active = 0;
432 			nm_wr(sc, NM_PLAYBACK_ENABLE_REG, 0, 1);
433 			nm_wr(sc, NM_AUDIO_MUTE_REG, NM_AUDIO_MUTE_BOTH, 2);
434 		}
435 	} else {
436 		if (go == PCMTRIG_START) {
437 			ch->active = 1;
438 			ch->wmark = ch->blksize;
439 			nm_wr(sc, NM_RECORD_ENABLE_REG, NM_RECORD_FREERUN |
440 				NM_RECORD_ENABLE_FLAG, 1);
441 			nm_wr(sc, NM_RBUFFER_START, sc->rbuf, 4);
442 			nm_wr(sc, NM_RBUFFER_END, sc->rbuf + NM_BUFFSIZE, 4);
443 			nm_wr(sc, NM_RBUFFER_CURRP, sc->rbuf, 4);
444 			nm_wr(sc, NM_RBUFFER_WMARK, sc->rbuf + ch->wmark, 4);
445 		} else {
446 			ch->active = 0;
447 			nm_wr(sc, NM_RECORD_ENABLE_REG, 0, 1);
448 		}
449 	}
450 	return 0;
451 }
452 
453 static int
454 nmchan_getptr(kobj_t obj, void *data)
455 {
456 	struct sc_chinfo *ch = data;
457 	struct sc_info *sc = ch->parent;
458 
459 	if (ch->dir == PCMDIR_PLAY)
460 		return nm_rd(sc, NM_PBUFFER_CURRP, 4) - sc->pbuf;
461 	else
462 		return nm_rd(sc, NM_RBUFFER_CURRP, 4) - sc->rbuf;
463 }
464 
465 static struct pcmchan_caps *
466 nmchan_getcaps(kobj_t obj, void *data)
467 {
468 	return &nm_caps;
469 }
470 
471 static kobj_method_t nmchan_methods[] = {
472     	KOBJMETHOD(channel_init,		nmchan_init),
473     	KOBJMETHOD(channel_free,		nmchan_free),
474     	KOBJMETHOD(channel_setformat,		nmchan_setformat),
475     	KOBJMETHOD(channel_setspeed,		nmchan_setspeed),
476     	KOBJMETHOD(channel_setblocksize,	nmchan_setblocksize),
477     	KOBJMETHOD(channel_trigger,		nmchan_trigger),
478     	KOBJMETHOD(channel_getptr,		nmchan_getptr),
479     	KOBJMETHOD(channel_getcaps,		nmchan_getcaps),
480 	{ 0, 0 }
481 };
482 CHANNEL_DECLARE(nmchan);
483 
484 /* The interrupt handler */
485 static void
486 nm_intr(void *p)
487 {
488 	struct sc_info *sc = (struct sc_info *)p;
489 	int status, x;
490 
491 	status = nm_rd(sc, NM_INT_REG, sc->irsz);
492 	if (status == 0)
493 		return;
494 
495 	if (status & sc->playint) {
496 		status &= ~sc->playint;
497 		sc->pch.wmark += sc->pch.blksize;
498 		sc->pch.wmark %= NM_BUFFSIZE;
499 		nm_wr(sc, NM_PBUFFER_WMARK, sc->pbuf + sc->pch.wmark, 4);
500 
501 		nm_ackint(sc, sc->playint);
502 		chn_intr(sc->pch.channel);
503 	}
504 	if (status & sc->recint) {
505 		status &= ~sc->recint;
506 		sc->rch.wmark += sc->rch.blksize;
507 		sc->rch.wmark %= NM_BUFFSIZE;
508 		nm_wr(sc, NM_RBUFFER_WMARK, sc->rbuf + sc->rch.wmark, 4);
509 
510 		nm_ackint(sc, sc->recint);
511 		chn_intr(sc->rch.channel);
512 	}
513 	if (status & sc->misc1int) {
514 		status &= ~sc->misc1int;
515 		nm_ackint(sc, sc->misc1int);
516 		x = nm_rd(sc, 0x400, 1);
517 		nm_wr(sc, 0x400, x | 2, 1);
518 	 	device_printf(sc->dev, "misc int 1\n");
519 	}
520 	if (status & sc->misc2int) {
521 		status &= ~sc->misc2int;
522 		nm_ackint(sc, sc->misc2int);
523 		x = nm_rd(sc, 0x400, 1);
524 		nm_wr(sc, 0x400, x & ~2, 1);
525 	 	device_printf(sc->dev, "misc int 2\n");
526 	}
527 	if (status) {
528 		nm_ackint(sc, status);
529 	 	device_printf(sc->dev, "unknown int\n");
530 	}
531 }
532 
533 /* -------------------------------------------------------------------- */
534 
535 /*
536  * Probe and attach the card
537  */
538 
539 static int
540 nm_init(struct sc_info *sc)
541 {
542 	u_int32_t ofs, i;
543 
544 	if (sc->type == NM256AV_PCI_ID) {
545 		sc->ac97_base = NM_MIXER_OFFSET;
546 		sc->ac97_status = NM_MIXER_STATUS_OFFSET;
547 		sc->ac97_busy = NM_MIXER_READY_MASK;
548 
549 		sc->buftop = 2560 * 1024;
550 
551 		sc->irsz = 2;
552 		sc->playint = NM_PLAYBACK_INT;
553 		sc->recint = NM_RECORD_INT;
554 		sc->misc1int = NM_MISC_INT_1;
555 		sc->misc2int = NM_MISC_INT_2;
556 	} else if (sc->type == NM256ZX_PCI_ID) {
557 		sc->ac97_base = NM_MIXER_OFFSET;
558 		sc->ac97_status = NM2_MIXER_STATUS_OFFSET;
559 		sc->ac97_busy = NM2_MIXER_READY_MASK;
560 
561 		sc->buftop = (nm_rd(sc, 0xa0b, 2)? 6144 : 4096) * 1024;
562 
563 		sc->irsz = 4;
564 		sc->playint = NM2_PLAYBACK_INT;
565 		sc->recint = NM2_RECORD_INT;
566 		sc->misc1int = NM2_MISC_INT_1;
567 		sc->misc2int = NM2_MISC_INT_2;
568 	} else return -1;
569 	sc->badintr = 0;
570 	ofs = sc->buftop - 0x0400;
571 	sc->buftop -= 0x1400;
572 
573 	if (bootverbose)
574 		device_printf(sc->dev, "buftop is 0x%08x\n", sc->buftop);
575  	if ((nm_rdbuf(sc, ofs, 4) & NM_SIG_MASK) == NM_SIGNATURE) {
576 		i = nm_rdbuf(sc, ofs + 4, 4);
577 		if (i != 0 && i != 0xffffffff) {
578 			if (bootverbose)
579 				device_printf(sc->dev, "buftop is changed to 0x%08x\n", i);
580 			sc->buftop = i;
581 		}
582 	}
583 
584 	sc->cbuf = sc->buftop - NM_MAX_COEFFICIENT;
585 	sc->rbuf = sc->cbuf - NM_BUFFSIZE;
586 	sc->pbuf = sc->rbuf - NM_BUFFSIZE;
587 	sc->acbuf = sc->pbuf - (NM_TOTAL_COEFF_COUNT * 4);
588 
589 	nm_wr(sc, 0, 0x11, 1);
590 	nm_wr(sc, NM_RECORD_ENABLE_REG, 0, 1);
591 	nm_wr(sc, 0x214, 0, 2);
592 
593 	return 0;
594 }
595 
596 static int
597 nm_pci_probe(device_t dev)
598 {
599 	struct sc_info *sc = NULL;
600 	char *s = NULL;
601 	u_int32_t subdev, i, data;
602 
603 	subdev = (pci_get_subdevice(dev) << 16) | pci_get_subvendor(dev);
604 	switch (pci_get_devid(dev)) {
605 	case NM256AV_PCI_ID:
606 		i = 0;
607 		while ((i < NUM_BADCARDS) && (badcards[i] != subdev))
608 			i++;
609 
610 		/* Try to catch other non-ac97 cards */
611 
612 		if (i == NUM_BADCARDS) {
613 			if (!(sc = kmalloc(sizeof(*sc), M_DEVBUF, M_NOWAIT | M_ZERO))) {
614 				device_printf(dev, "cannot allocate softc\n");
615 				return ENXIO;
616 			}
617 
618 			data = pci_read_config(dev, PCIR_COMMAND, 2);
619 			pci_write_config(dev, PCIR_COMMAND, data |
620 					 PCIM_CMD_PORTEN | PCIM_CMD_MEMEN |
621 					 PCIM_CMD_BUSMASTEREN, 2);
622 
623 			sc->regid = PCIR_BAR(1);
624 			sc->reg = bus_alloc_resource_any(dev, SYS_RES_MEMORY,
625 							 &sc->regid,
626 							 RF_ACTIVE);
627 
628 			if (!sc->reg) {
629 				device_printf(dev, "unable to map register space\n");
630 				pci_write_config(dev, PCIR_COMMAND, data, 2);
631 				kfree(sc, M_DEVBUF);
632 				return ENXIO;
633 			}
634 
635 			/*
636 			 * My Panasonic CF-M2EV needs resetting device
637 			 * before checking mixer is present or not.
638 			 * t.ichinoseki@nifty.com.
639 			 */
640 			nm_wr(sc, 0, 0x11, 1); /* reset device */
641 			if ((nm_rd(sc, NM_MIXER_PRESENCE, 2) &
642 				NM_PRESENCE_MASK) != NM_PRESENCE_VALUE) {
643 				i = 0;	/* non-ac97 card, but not listed */
644 				DEB(device_printf(dev, "subdev = 0x%x - badcard?\n",
645 				    subdev));
646 			}
647 			pci_write_config(dev, PCIR_COMMAND, data, 2);
648 			bus_release_resource(dev, SYS_RES_MEMORY, sc->regid,
649 					     sc->reg);
650 			kfree(sc, M_DEVBUF);
651 		}
652 
653 		if (i == NUM_BADCARDS)
654 			s = "NeoMagic 256AV";
655 		DEB(else)
656 			DEB(device_printf(dev, "this is a non-ac97 NM256AV, not attaching\n"));
657 
658 		break;
659 
660 	case NM256ZX_PCI_ID:
661 		s = "NeoMagic 256ZX";
662 		break;
663 	}
664 
665 	if (s) device_set_desc(dev, s);
666 	return s? 0 : ENXIO;
667 }
668 
669 static int
670 nm_pci_attach(device_t dev)
671 {
672 	u_int32_t	data;
673 	struct sc_info *sc;
674 	struct ac97_info *codec = 0;
675 	char 		status[SND_STATUSLEN];
676 
677 	if ((sc = kmalloc(sizeof(*sc), M_DEVBUF, M_NOWAIT | M_ZERO)) == NULL) {
678 		device_printf(dev, "cannot allocate softc\n");
679 		return ENXIO;
680 	}
681 
682 	sc->dev = dev;
683 	sc->type = pci_get_devid(dev);
684 
685 	data = pci_read_config(dev, PCIR_COMMAND, 2);
686 	data |= (PCIM_CMD_PORTEN|PCIM_CMD_MEMEN|PCIM_CMD_BUSMASTEREN);
687 	pci_write_config(dev, PCIR_COMMAND, data, 2);
688 	data = pci_read_config(dev, PCIR_COMMAND, 2);
689 
690 	sc->bufid = PCIR_BAR(0);
691 	sc->buf = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &sc->bufid,
692 					 RF_ACTIVE);
693 	sc->regid = PCIR_BAR(1);
694 	sc->reg = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &sc->regid,
695 					 RF_ACTIVE);
696 
697 	if (!sc->buf || !sc->reg) {
698 		device_printf(dev, "unable to map register space\n");
699 		goto bad;
700 	}
701 
702 	if (nm_init(sc) == -1) {
703 		device_printf(dev, "unable to initialize the card\n");
704 		goto bad;
705 	}
706 
707 	codec = AC97_CREATE(dev, sc, nm_ac97);
708 	if (codec == NULL) goto bad;
709 	if (mixer_init(dev, ac97_getmixerclass(), codec) == -1) goto bad;
710 
711 	sc->irqid = 0;
712 	sc->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->irqid,
713 					 RF_ACTIVE | RF_SHAREABLE);
714 	if (!sc->irq || snd_setup_intr(dev, sc->irq, 0, nm_intr, sc, &sc->ih)) {
715 		device_printf(dev, "unable to map interrupt\n");
716 		goto bad;
717 	}
718 
719 	ksnprintf(status, SND_STATUSLEN, "at memory 0x%lx, 0x%lx irq %ld %s",
720 		 rman_get_start(sc->buf), rman_get_start(sc->reg),
721 		 rman_get_start(sc->irq),PCM_KLDSTRING(snd_neomagic));
722 
723 	if (pcm_register(dev, sc, 1, 1)) goto bad;
724 	pcm_addchan(dev, PCMDIR_REC, &nmchan_class, sc);
725 	pcm_addchan(dev, PCMDIR_PLAY, &nmchan_class, sc);
726 	pcm_setstatus(dev, status);
727 
728 	return 0;
729 
730 bad:
731 	if (codec) ac97_destroy(codec);
732 	if (sc->buf) bus_release_resource(dev, SYS_RES_MEMORY, sc->bufid, sc->buf);
733 	if (sc->reg) bus_release_resource(dev, SYS_RES_MEMORY, sc->regid, sc->reg);
734 	if (sc->ih) bus_teardown_intr(dev, sc->irq, sc->ih);
735 	if (sc->irq) bus_release_resource(dev, SYS_RES_IRQ, sc->irqid, sc->irq);
736 	kfree(sc, M_DEVBUF);
737 	return ENXIO;
738 }
739 
740 static int
741 nm_pci_detach(device_t dev)
742 {
743 	int r;
744 	struct sc_info *sc;
745 
746 	r = pcm_unregister(dev);
747 	if (r)
748 		return r;
749 
750 	sc = pcm_getdevinfo(dev);
751 	bus_release_resource(dev, SYS_RES_MEMORY, sc->bufid, sc->buf);
752 	bus_release_resource(dev, SYS_RES_MEMORY, sc->regid, sc->reg);
753 	bus_teardown_intr(dev, sc->irq, sc->ih);
754 	bus_release_resource(dev, SYS_RES_IRQ, sc->irqid, sc->irq);
755 	kfree(sc, M_DEVBUF);
756 
757 	return 0;
758 }
759 
760 static int
761 nm_pci_suspend(device_t dev)
762 {
763 	struct sc_info *sc;
764 
765 	sc = pcm_getdevinfo(dev);
766 
767 	/* stop playing */
768 	if (sc->pch.active) {
769 		nm_wr(sc, NM_PLAYBACK_ENABLE_REG, 0, 1);
770 		nm_wr(sc, NM_AUDIO_MUTE_REG, NM_AUDIO_MUTE_BOTH, 2);
771 	}
772 	/* stop recording */
773 	if (sc->rch.active) {
774 		nm_wr(sc, NM_RECORD_ENABLE_REG, 0, 1);
775 	}
776 	return 0;
777 }
778 
779 static int
780 nm_pci_resume(device_t dev)
781 {
782 	struct sc_info *sc;
783 
784 	sc = pcm_getdevinfo(dev);
785 
786 	/*
787 	 * Reinit audio device.
788 	 * Don't call nm_init(). It would change buftop if X ran or
789 	 * is running. This makes playing and recording buffer address
790 	 * shift but these buffers of channel layer are not changed.
791 	 * As a result of this inconsistency, periodic noise will be
792 	 * generated while playing.
793 	 */
794 	nm_wr(sc, 0, 0x11, 1);
795 	nm_wr(sc, 0x214, 0, 2);
796 
797 	/* Reinit mixer */
798     	if (mixer_reinit(dev) == -1) {
799 		device_printf(dev, "unable to reinitialize the mixer\n");
800 		return ENXIO;
801 	}
802 	/* restart playing */
803 	if (sc->pch.active) {
804 		nm_wr(sc, NM_PLAYBACK_ENABLE_REG, NM_PLAYBACK_FREERUN |
805 			  NM_PLAYBACK_ENABLE_FLAG, 1);
806 		nm_wr(sc, NM_AUDIO_MUTE_REG, 0, 2);
807 	}
808 	/* restart recording */
809 	if (sc->rch.active) {
810 		nm_wr(sc, NM_RECORD_ENABLE_REG, NM_RECORD_FREERUN |
811 			  NM_RECORD_ENABLE_FLAG, 1);
812 	}
813 	return 0;
814 }
815 
816 static device_method_t nm_methods[] = {
817 	/* Device interface */
818 	DEVMETHOD(device_probe,		nm_pci_probe),
819 	DEVMETHOD(device_attach,	nm_pci_attach),
820 	DEVMETHOD(device_detach,	nm_pci_detach),
821 	DEVMETHOD(device_suspend,	nm_pci_suspend),
822 	DEVMETHOD(device_resume,	nm_pci_resume),
823 	{ 0, 0 }
824 };
825 
826 static driver_t nm_driver = {
827 	"pcm",
828 	nm_methods,
829 	PCM_SOFTC_SIZE,
830 };
831 
832 DRIVER_MODULE(snd_neomagic, pci, nm_driver, pcm_devclass, 0, 0);
833 MODULE_DEPEND(snd_neomagic, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER);
834 MODULE_VERSION(snd_neomagic, 1);
835