Merge from vendor branch LIBSTDC++:
[dragonfly.git] / sys / dev / sound / isa / sbc.c
1 /*
2  * Copyright (c) 1999 Seigo Tanimura
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/sys/dev/sound/isa/sbc.c,v 1.19.2.12 2002/12/24 21:17:42 semenu Exp $
27  * $DragonFly: src/sys/dev/sound/isa/sbc.c,v 1.2 2003/06/17 04:28:30 dillon Exp $
28  */
29
30 #include <dev/sound/chip.h>
31 #include <dev/sound/pcm/sound.h>
32 #include <dev/sound/isa/sb.h>
33
34 SND_DECLARE_FILE("$DragonFly: src/sys/dev/sound/isa/sbc.c,v 1.2 2003/06/17 04:28:30 dillon Exp $");
35
36 #define IO_MAX  3
37 #define IRQ_MAX 1
38 #define DRQ_MAX 2
39 #define INTR_MAX        2
40
41 struct sbc_softc;
42
43 struct sbc_ihl {
44         driver_intr_t *intr[INTR_MAX];
45         void *intr_arg[INTR_MAX];
46         struct sbc_softc *parent;
47 };
48
49 /* Here is the parameter structure per a device. */
50 struct sbc_softc {
51         device_t dev; /* device */
52         device_t child_pcm, child_midi1, child_midi2;
53
54         int io_rid[IO_MAX]; /* io port rids */
55         struct resource *io[IO_MAX]; /* io port resources */
56         int io_alloced[IO_MAX]; /* io port alloc flag */
57
58         int irq_rid[IRQ_MAX]; /* irq rids */
59         struct resource *irq[IRQ_MAX]; /* irq resources */
60         int irq_alloced[IRQ_MAX]; /* irq alloc flag */
61
62         int drq_rid[DRQ_MAX]; /* drq rids */
63         struct resource *drq[DRQ_MAX]; /* drq resources */
64         int drq_alloced[DRQ_MAX]; /* drq alloc flag */
65
66         struct sbc_ihl ihl[IRQ_MAX];
67
68         void *ih[IRQ_MAX];
69
70         void *lock;
71
72         u_int32_t bd_ver;
73 };
74
75 static int sbc_probe(device_t dev);
76 static int sbc_attach(device_t dev);
77 static void sbc_intr(void *p);
78
79 static struct resource *sbc_alloc_resource(device_t bus, device_t child, int type, int *rid,
80                                            u_long start, u_long end, u_long count, u_int flags);
81 static int sbc_release_resource(device_t bus, device_t child, int type, int rid,
82                                 struct resource *r);
83 static int sbc_setup_intr(device_t dev, device_t child, struct resource *irq,
84                int flags, driver_intr_t *intr, void *arg,
85                void **cookiep);
86 static int sbc_teardown_intr(device_t dev, device_t child, struct resource *irq,
87                   void *cookie);
88
89 static int alloc_resource(struct sbc_softc *scp);
90 static int release_resource(struct sbc_softc *scp);
91
92 static devclass_t sbc_devclass;
93
94 static int io_range[3] = {0x10, 0x2, 0x4};
95
96 #ifdef PC98 /* I/O address table for PC98 */
97 static bus_addr_t pcm_iat[] = {
98         0x000, 0x100, 0x200, 0x300, 0x400, 0x500, 0x600, 0x700,
99         0x800, 0x900, 0xa00, 0xb00, 0xc00, 0xd00, 0xe00, 0xf00
100 };
101 static bus_addr_t midi_iat[] = {
102         0x000, 0x100
103 };
104 static bus_addr_t opl_iat[] = {
105         0x000, 0x100, 0x200, 0x300
106 };
107 static bus_addr_t *sb_iat[] = { pcm_iat, midi_iat, opl_iat };
108 #endif
109
110 static int sb_rd(struct resource *io, int reg);
111 static void sb_wr(struct resource *io, int reg, u_int8_t val);
112 static int sb_dspready(struct resource *io);
113 static int sb_cmd(struct resource *io, u_char val);
114 static u_int sb_get_byte(struct resource *io);
115 static void sb_setmixer(struct resource *io, u_int port, u_int value);
116
117 static void
118 sbc_lockinit(struct sbc_softc *scp)
119 {
120         scp->lock = snd_mtxcreate(device_get_nameunit(scp->dev), "sound softc");
121 }
122
123 static void
124 sbc_lockdestroy(struct sbc_softc *scp)
125 {
126         snd_mtxfree(scp->lock);
127 }
128
129 void
130 sbc_lock(struct sbc_softc *scp)
131 {
132         snd_mtxlock(scp->lock);
133 }
134
135 void
136 sbc_unlock(struct sbc_softc *scp)
137 {
138         snd_mtxunlock(scp->lock);
139 }
140
141 static int
142 sb_rd(struct resource *io, int reg)
143 {
144         return bus_space_read_1(rman_get_bustag(io),
145                                 rman_get_bushandle(io),
146                                 reg);
147 }
148
149 static void
150 sb_wr(struct resource *io, int reg, u_int8_t val)
151 {
152         bus_space_write_1(rman_get_bustag(io),
153                           rman_get_bushandle(io),
154                           reg, val);
155 }
156
157 static int
158 sb_dspready(struct resource *io)
159 {
160         return ((sb_rd(io, SBDSP_STATUS) & 0x80) == 0);
161 }
162
163 static int
164 sb_dspwr(struct resource *io, u_char val)
165 {
166         int  i;
167
168         for (i = 0; i < 1000; i++) {
169                 if (sb_dspready(io)) {
170                         sb_wr(io, SBDSP_CMD, val);
171                         return 1;
172                 }
173                 if (i > 10) DELAY((i > 100)? 1000 : 10);
174         }
175         printf("sb_dspwr(0x%02x) timed out.\n", val);
176         return 0;
177 }
178
179 static int
180 sb_cmd(struct resource *io, u_char val)
181 {
182         return sb_dspwr(io, val);
183 }
184
185 static void
186 sb_setmixer(struct resource *io, u_int port, u_int value)
187 {
188         u_long   flags;
189
190         flags = spltty();
191         sb_wr(io, SB_MIX_ADDR, (u_char) (port & 0xff)); /* Select register */
192         DELAY(10);
193         sb_wr(io, SB_MIX_DATA, (u_char) (value & 0xff));
194         DELAY(10);
195         splx(flags);
196 }
197
198 static u_int
199 sb_get_byte(struct resource *io)
200 {
201         int i;
202
203         for (i = 1000; i > 0; i--) {
204                 if (sb_rd(io, DSP_DATA_AVAIL) & 0x80)
205                         return sb_rd(io, DSP_READ);
206                 else
207                         DELAY(20);
208         }
209         return 0xffff;
210 }
211
212 static int
213 sb_reset_dsp(struct resource *io)
214 {
215         sb_wr(io, SBDSP_RST, 3);
216         DELAY(100);
217         sb_wr(io, SBDSP_RST, 0);
218         return (sb_get_byte(io) == 0xAA)? 0 : ENXIO;
219 }
220
221 static int
222 sb_identify_board(struct resource *io)
223 {
224         int ver, essver, rev;
225
226         sb_cmd(io, DSP_CMD_GETVER);     /* Get version */
227         ver = (sb_get_byte(io) << 8) | sb_get_byte(io);
228         if (ver < 0x100 || ver > 0x4ff) return 0;
229         if (ver == 0x0301) {
230                 /* Try to detect ESS chips. */
231                 sb_cmd(io, DSP_CMD_GETID); /* Return ident. bytes. */
232                 essver = (sb_get_byte(io) << 8) | sb_get_byte(io);
233                 rev = essver & 0x000f;
234                 essver &= 0xfff0;
235                 if (essver == 0x4880) ver |= 0x1000;
236                 else if (essver == 0x6880) ver = 0x0500 | rev;
237         }
238         return ver;
239 }
240
241 static struct isa_pnp_id sbc_ids[] = {
242         {0x01008c0e, "Creative ViBRA16C"},              /* CTL0001 */
243         {0x31008c0e, "Creative SB16/SB32"},             /* CTL0031 */
244         {0x41008c0e, "Creative SB16/SB32"},             /* CTL0041 */
245         {0x42008c0e, "Creative SB AWE64"},              /* CTL0042 */
246         {0x43008c0e, "Creative ViBRA16X"},              /* CTL0043 */
247         {0x44008c0e, "Creative SB AWE64 Gold"},         /* CTL0044 */
248         {0x45008c0e, "Creative SB AWE64"},              /* CTL0045 */
249         {0x46008c0e, "Creative SB AWE64"},              /* CTL0046 */
250
251         {0x01000000, "Avance Logic ALS100+"},           /* @@@0001 - ViBRA16X clone */
252         {0x01100000, "Avance Asound 110"},              /* @@@1001 */
253         {0x01200000, "Avance Logic ALS120"},            /* @@@2001 - ViBRA16X clone */
254
255         {0x81167316, "ESS ES1681"},                     /* ESS1681 */
256         {0x02017316, "ESS ES1688"},                     /* ESS1688 */
257         {0x68187316, "ESS ES1868"},                     /* ESS1868 */
258         {0x03007316, "ESS ES1869"},                     /* ESS1869 */
259         {0x69187316, "ESS ES1869"},                     /* ESS1869 */
260         {0xabb0110e, "ESS ES1869 (Compaq OEM)"},        /* CPQb0ab */
261         {0xacb0110e, "ESS ES1869 (Compaq OEM)"},        /* CPQb0ac */
262         {0x78187316, "ESS ES1878"},                     /* ESS1878 */
263         {0x79187316, "ESS ES1879"},                     /* ESS1879 */
264         {0x88187316, "ESS ES1888"},                     /* ESS1888 */
265         {0x07017316, "ESS ES1888 (DEC OEM)"},           /* ESS0107 */
266         {0x06017316, "ESS ES1888 (Dell OEM)"},          /* ESS0106 */
267         {0}
268 };
269
270 static int
271 sbc_probe(device_t dev)
272 {
273         char *s = NULL;
274         u_int32_t lid, vid;
275
276         lid = isa_get_logicalid(dev);
277         vid = isa_get_vendorid(dev);
278         if (lid) {
279                 if (lid == 0x01000000 && vid != 0x01009305) /* ALS0001 */
280                         return ENXIO;
281                 /* Check pnp ids */
282                 return ISA_PNP_PROBE(device_get_parent(dev), dev, sbc_ids);
283         } else {
284                 int rid = 0, ver;
285                 struct resource *io;
286
287 #ifdef PC98
288                 io = isa_alloc_resourcev(dev, SYS_RES_IOPORT, &rid,
289                                          pcm_iat, 16, RF_ACTIVE);
290 #else
291                 io = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid,
292                                         0, ~0, 16, RF_ACTIVE);
293 #endif
294                 if (!io) goto bad;
295 #ifdef PC98
296                 isa_load_resourcev(io, pcm_iat, 16);
297 #endif
298                 if (sb_reset_dsp(io)) goto bad2;
299                 ver = sb_identify_board(io);
300                 if (ver == 0) goto bad2;
301                 switch ((ver & 0x00000f00) >> 8) {
302                 case 1:
303                         device_set_desc(dev, "SoundBlaster 1.0 (not supported)");
304                         s = NULL;
305                         break;
306
307                 case 2:
308                         s = "SoundBlaster 2.0";
309                         break;
310
311                 case 3:
312                         s = (ver & 0x0000f000)? "ESS 488" : "SoundBlaster Pro";
313                         break;
314
315                 case 4:
316                         s = "SoundBlaster 16";
317                         break;
318
319                 case 5:
320                         s = (ver & 0x00000008)? "ESS 688" : "ESS 1688";
321                         break;
322                 }
323                 if (s) device_set_desc(dev, s);
324 bad2:           bus_release_resource(dev, SYS_RES_IOPORT, rid, io);
325 bad:            return s? 0 : ENXIO;
326         }
327 }
328
329 static int
330 sbc_attach(device_t dev)
331 {
332         char *err = NULL;
333         struct sbc_softc *scp;
334         struct sndcard_func *func;
335         u_int32_t logical_id = isa_get_logicalid(dev);
336         int flags = device_get_flags(dev);
337         int f, dh, dl, x, irq, i;
338
339         if (!logical_id && (flags & DV_F_DUAL_DMA)) {
340                 bus_set_resource(dev, SYS_RES_DRQ, 1,
341                                  flags & DV_F_DRQ_MASK, 1);
342         }
343
344         scp = device_get_softc(dev);
345         bzero(scp, sizeof(*scp));
346         scp->dev = dev;
347         sbc_lockinit(scp);
348         err = "alloc_resource";
349         if (alloc_resource(scp)) goto bad;
350
351         err = "sb_reset_dsp";
352         if (sb_reset_dsp(scp->io[0])) goto bad;
353         err = "sb_identify_board";
354         scp->bd_ver = sb_identify_board(scp->io[0]) & 0x00000fff;
355         if (scp->bd_ver == 0) goto bad;
356         f = 0;
357         if (logical_id == 0x01200000 && scp->bd_ver < 0x0400) scp->bd_ver = 0x0499;
358         switch ((scp->bd_ver & 0x0f00) >> 8) {
359         case 1: /* old sound blaster has nothing... */
360                 break;
361
362         case 2:
363                 f |= BD_F_DUP_MIDI;
364                 if (scp->bd_ver > 0x200) f |= BD_F_MIX_CT1335;
365                 break;
366
367         case 5:
368                 f |= BD_F_ESS;
369                 scp->bd_ver = 0x0301;
370         case 3:
371                 f |= BD_F_DUP_MIDI | BD_F_MIX_CT1345;
372                 break;
373
374         case 4:
375                 f |= BD_F_SB16 | BD_F_MIX_CT1745;
376                 if (scp->drq[0]) dl = rman_get_start(scp->drq[0]); else dl = -1;
377                 if (scp->drq[1]) dh = rman_get_start(scp->drq[1]); else dh = dl;
378                 if (!logical_id && (dh < dl)) {
379                         struct resource *r;
380                         r = scp->drq[0];
381                         scp->drq[0] = scp->drq[1];
382                         scp->drq[1] = r;
383                         dl = rman_get_start(scp->drq[0]);
384                         dh = rman_get_start(scp->drq[1]);
385                 }
386                 /* soft irq/dma configuration */
387                 x = -1;
388                 irq = rman_get_start(scp->irq[0]);
389 #ifdef PC98
390                 /* SB16 in PC98 use different IRQ table */
391                 if      (irq == 3) x = 1;
392                 else if (irq == 5) x = 8;
393                 else if (irq == 10) x = 2;
394                 else if (irq == 12) x = 4;
395                 if (x == -1) {
396                         err = "bad irq (3/5/10/12 valid)";
397                         goto bad;
398                 }
399                 else sb_setmixer(scp->io[0], IRQ_NR, x);
400                 /* SB16 in PC98 use different dma setting */
401                 sb_setmixer(scp->io[0], DMA_NR, dh == 0 ? 1 : 2);
402 #else
403                 if      (irq == 5) x = 2;
404                 else if (irq == 7) x = 4;
405                 else if (irq == 9) x = 1;
406                 else if (irq == 10) x = 8;
407                 if (x == -1) {
408                         err = "bad irq (5/7/9/10 valid)";
409                         goto bad;
410                 }
411                 else sb_setmixer(scp->io[0], IRQ_NR, x);
412                 sb_setmixer(scp->io[0], DMA_NR, (1 << dh) | (1 << dl));
413 #endif
414                 if (bootverbose) {
415                         device_printf(dev, "setting card to irq %d, drq %d", irq, dl);
416                         if (dl != dh) printf(", %d", dh);
417                         printf("\n");
418                 }
419                 break;
420         }
421
422         switch (logical_id) {
423         case 0x43008c0e:        /* CTL0043 */
424         case 0x01200000:
425         case 0x01000000:
426                 f |= BD_F_SB16X;
427                 break;
428         }
429         scp->bd_ver |= f << 16;
430
431         err = "setup_intr";
432         for (i = 0; i < IRQ_MAX; i++) {
433                 scp->ihl[i].parent = scp;
434                 if (snd_setup_intr(dev, scp->irq[i], INTR_MPSAFE, sbc_intr, &scp->ihl[i], &scp->ih[i]))
435                         goto bad;
436         }
437
438         /* PCM Audio */
439         func = malloc(sizeof(struct sndcard_func), M_DEVBUF, M_NOWAIT | M_ZERO);
440         if (func == NULL) goto bad;
441         func->func = SCF_PCM;
442         scp->child_pcm = device_add_child(dev, "pcm", -1);
443         device_set_ivars(scp->child_pcm, func);
444
445         /* Midi Interface */
446         func = malloc(sizeof(struct sndcard_func), M_DEVBUF, M_NOWAIT | M_ZERO);
447         if (func == NULL) goto bad;
448         func->func = SCF_MIDI;
449         scp->child_midi1 = device_add_child(dev, "midi", -1);
450         device_set_ivars(scp->child_midi1, func);
451
452         /* OPL FM Synthesizer */
453         func = malloc(sizeof(struct sndcard_func), M_DEVBUF, M_NOWAIT | M_ZERO);
454         if (func == NULL) goto bad;
455         func->func = SCF_SYNTH;
456         scp->child_midi2 = device_add_child(dev, "midi", -1);
457         device_set_ivars(scp->child_midi2, func);
458
459         /* probe/attach kids */
460         bus_generic_attach(dev);
461
462         return (0);
463
464 bad:    if (err) device_printf(dev, "%s\n", err);
465         release_resource(scp);
466         return (ENXIO);
467 }
468
469 static int
470 sbc_detach(device_t dev)
471 {
472         struct sbc_softc *scp = device_get_softc(dev);
473
474         sbc_lock(scp);
475         device_delete_child(dev, scp->child_midi2);
476         device_delete_child(dev, scp->child_midi1);
477         device_delete_child(dev, scp->child_pcm);
478         release_resource(scp);
479         sbc_lockdestroy(scp);
480         return bus_generic_detach(dev);
481 }
482
483 static void
484 sbc_intr(void *p)
485 {
486         struct sbc_ihl *ihl = p;
487         int i;
488
489         /* sbc_lock(ihl->parent); */
490         i = 0;
491         while (i < INTR_MAX) {
492                 if (ihl->intr[i] != NULL) ihl->intr[i](ihl->intr_arg[i]);
493                 i++;
494         }
495         /* sbc_unlock(ihl->parent); */
496 }
497
498 static int
499 sbc_setup_intr(device_t dev, device_t child, struct resource *irq,
500                int flags, driver_intr_t *intr, void *arg,
501                void **cookiep)
502 {
503         struct sbc_softc *scp = device_get_softc(dev);
504         struct sbc_ihl *ihl = NULL;
505         int i, ret;
506
507         sbc_lock(scp);
508         i = 0;
509         while (i < IRQ_MAX) {
510                 if (irq == scp->irq[i]) ihl = &scp->ihl[i];
511                 i++;
512         }
513         ret = 0;
514         if (ihl == NULL) ret = EINVAL;
515         i = 0;
516         while ((ret == 0) && (i < INTR_MAX)) {
517                 if (ihl->intr[i] == NULL) {
518                         ihl->intr[i] = intr;
519                         ihl->intr_arg[i] = arg;
520                         *cookiep = &ihl->intr[i];
521                         ret = -1;
522                 } else i++;
523         }
524         sbc_unlock(scp);
525         return (ret > 0)? EINVAL : 0;
526 }
527
528 static int
529 sbc_teardown_intr(device_t dev, device_t child, struct resource *irq,
530                   void *cookie)
531 {
532         struct sbc_softc *scp = device_get_softc(dev);
533         struct sbc_ihl *ihl = NULL;
534         int i, ret;
535
536         sbc_lock(scp);
537         i = 0;
538         while (i < IRQ_MAX) {
539                 if (irq == scp->irq[i]) ihl = &scp->ihl[i];
540                 i++;
541         }
542         ret = 0;
543         if (ihl == NULL) ret = EINVAL;
544         i = 0;
545         while ((ret == 0) && (i < INTR_MAX)) {
546                 if (cookie == &ihl->intr[i]) {
547                         ihl->intr[i] = NULL;
548                         ihl->intr_arg[i] = NULL;
549                         return 0;
550                 } else i++;
551         }
552         sbc_unlock(scp);
553         return (ret > 0)? EINVAL : 0;
554 }
555
556 static struct resource *
557 sbc_alloc_resource(device_t bus, device_t child, int type, int *rid,
558                       u_long start, u_long end, u_long count, u_int flags)
559 {
560         struct sbc_softc *scp;
561         int *alloced, rid_max, alloced_max;
562         struct resource **res;
563 #ifdef PC98
564         int i;
565 #endif
566
567         scp = device_get_softc(bus);
568         switch (type) {
569         case SYS_RES_IOPORT:
570                 alloced = scp->io_alloced;
571                 res = scp->io;
572 #ifdef PC98
573                 rid_max = 0;
574                 for (i = 0; i < IO_MAX; i++)
575                         rid_max += io_range[i];
576 #else
577                 rid_max = IO_MAX - 1;
578 #endif
579                 alloced_max = 1;
580                 break;
581         case SYS_RES_DRQ:
582                 alloced = scp->drq_alloced;
583                 res = scp->drq;
584                 rid_max = DRQ_MAX - 1;
585                 alloced_max = 1;
586                 break;
587         case SYS_RES_IRQ:
588                 alloced = scp->irq_alloced;
589                 res = scp->irq;
590                 rid_max = IRQ_MAX - 1;
591                 alloced_max = INTR_MAX; /* pcm and mpu may share the irq. */
592                 break;
593         default:
594                 return (NULL);
595         }
596
597         if (*rid > rid_max || alloced[*rid] == alloced_max)
598                 return (NULL);
599
600         alloced[*rid]++;
601         return (res[*rid]);
602 }
603
604 static int
605 sbc_release_resource(device_t bus, device_t child, int type, int rid,
606                         struct resource *r)
607 {
608         struct sbc_softc *scp;
609         int *alloced, rid_max;
610
611         scp = device_get_softc(bus);
612         switch (type) {
613         case SYS_RES_IOPORT:
614                 alloced = scp->io_alloced;
615                 rid_max = IO_MAX - 1;
616                 break;
617         case SYS_RES_DRQ:
618                 alloced = scp->drq_alloced;
619                 rid_max = DRQ_MAX - 1;
620                 break;
621         case SYS_RES_IRQ:
622                 alloced = scp->irq_alloced;
623                 rid_max = IRQ_MAX - 1;
624                 break;
625         default:
626                 return (1);
627         }
628
629         if (rid > rid_max || alloced[rid] == 0)
630                 return (1);
631
632         alloced[rid]--;
633         return (0);
634 }
635
636 static int
637 sbc_read_ivar(device_t bus, device_t dev, int index, uintptr_t * result)
638 {
639         struct sbc_softc *scp = device_get_softc(bus);
640         struct sndcard_func *func = device_get_ivars(dev);
641
642         switch (index) {
643         case 0:
644                 *result = func->func;
645                 break;
646
647         case 1:
648                 *result = scp->bd_ver;
649                 break;
650
651         default:
652                 return ENOENT;
653         }
654
655         return 0;
656 }
657
658 static int
659 sbc_write_ivar(device_t bus, device_t dev,
660                int index, uintptr_t value)
661 {
662         switch (index) {
663         case 0:
664         case 1:
665                 return EINVAL;
666
667         default:
668                 return (ENOENT);
669         }
670 }
671
672 static int
673 alloc_resource(struct sbc_softc *scp)
674 {
675         int i;
676
677         for (i = 0 ; i < IO_MAX ; i++) {
678                 if (scp->io[i] == NULL) {
679 #ifdef PC98
680                         scp->io_rid[i] = i > 0 ?
681                                 scp->io_rid[i - 1] + io_range[i - 1] : 0;
682                         scp->io[i] = isa_alloc_resourcev(scp->dev,
683                                                          SYS_RES_IOPORT,
684                                                          &scp->io_rid[i],
685                                                          sb_iat[i],
686                                                          io_range[i],
687                                                          RF_ACTIVE);
688                         if (scp->io[i] != NULL)
689                                 isa_load_resourcev(scp->io[i], sb_iat[i],
690                                                    io_range[i]);
691 #else
692                         scp->io_rid[i] = i;
693                         scp->io[i] = bus_alloc_resource(scp->dev, SYS_RES_IOPORT, &scp->io_rid[i],
694                                                         0, ~0, io_range[i], RF_ACTIVE);
695 #endif
696                         if (i == 0 && scp->io[i] == NULL)
697                                 return (1);
698                         scp->io_alloced[i] = 0;
699                 }
700         }
701         for (i = 0 ; i < DRQ_MAX ; i++) {
702                 if (scp->drq[i] == NULL) {
703                         scp->drq_rid[i] = i;
704                         scp->drq[i] = bus_alloc_resource(scp->dev, SYS_RES_DRQ, &scp->drq_rid[i],
705                                                          0, ~0, 1, RF_ACTIVE);
706                         if (i == 0 && scp->drq[i] == NULL)
707                                 return (1);
708                         scp->drq_alloced[i] = 0;
709                 }
710         }
711         for (i = 0 ; i < IRQ_MAX ; i++) {
712                 if (scp->irq[i] == NULL) {
713                         scp->irq_rid[i] = i;
714                         scp->irq[i] = bus_alloc_resource(scp->dev, SYS_RES_IRQ, &scp->irq_rid[i],
715                                                          0, ~0, 1, RF_ACTIVE);
716                         if (i == 0 && scp->irq[i] == NULL)
717                                 return (1);
718                         scp->irq_alloced[i] = 0;
719                 }
720         }
721         return (0);
722 }
723
724 static int
725 release_resource(struct sbc_softc *scp)
726 {
727         int i;
728
729         for (i = 0 ; i < IO_MAX ; i++) {
730                 if (scp->io[i] != NULL) {
731                         bus_release_resource(scp->dev, SYS_RES_IOPORT, scp->io_rid[i], scp->io[i]);
732                         scp->io[i] = NULL;
733                 }
734         }
735         for (i = 0 ; i < DRQ_MAX ; i++) {
736                 if (scp->drq[i] != NULL) {
737                         bus_release_resource(scp->dev, SYS_RES_DRQ, scp->drq_rid[i], scp->drq[i]);
738                         scp->drq[i] = NULL;
739                 }
740         }
741         for (i = 0 ; i < IRQ_MAX ; i++) {
742                 if (scp->irq[i] != NULL) {
743                         if (scp->ih[i] != NULL)
744                                 bus_teardown_intr(scp->dev, scp->irq[i], scp->ih[i]);
745                         scp->ih[i] = NULL;
746                         bus_release_resource(scp->dev, SYS_RES_IRQ, scp->irq_rid[i], scp->irq[i]);
747                         scp->irq[i] = NULL;
748                 }
749         }
750         return (0);
751 }
752
753 static device_method_t sbc_methods[] = {
754         /* Device interface */
755         DEVMETHOD(device_probe,         sbc_probe),
756         DEVMETHOD(device_attach,        sbc_attach),
757         DEVMETHOD(device_detach,        sbc_detach),
758         DEVMETHOD(device_shutdown,      bus_generic_shutdown),
759         DEVMETHOD(device_suspend,       bus_generic_suspend),
760         DEVMETHOD(device_resume,        bus_generic_resume),
761
762         /* Bus interface */
763         DEVMETHOD(bus_read_ivar,        sbc_read_ivar),
764         DEVMETHOD(bus_write_ivar,       sbc_write_ivar),
765         DEVMETHOD(bus_print_child,      bus_generic_print_child),
766         DEVMETHOD(bus_alloc_resource,   sbc_alloc_resource),
767         DEVMETHOD(bus_release_resource, sbc_release_resource),
768         DEVMETHOD(bus_activate_resource, bus_generic_activate_resource),
769         DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource),
770         DEVMETHOD(bus_setup_intr,       sbc_setup_intr),
771         DEVMETHOD(bus_teardown_intr,    sbc_teardown_intr),
772
773         { 0, 0 }
774 };
775
776 static driver_t sbc_driver = {
777         "sbc",
778         sbc_methods,
779         sizeof(struct sbc_softc),
780 };
781
782 /* sbc can be attached to an isa bus. */
783 DRIVER_MODULE(snd_sbc, isa, sbc_driver, sbc_devclass, 0, 0);
784 MODULE_DEPEND(snd_sbc, snd_pcm, PCM_MINVER, PCM_PREFVER, PCM_MAXVER);
785 MODULE_VERSION(snd_sbc, 1);