ym.c revision 1.2
1 /* $NetBSD: ym.c,v 1.2 1998/05/21 19:09:28 augustss Exp $ */ 2 3 4 /* 5 * Copyright (c) 1998 Constantine Sapuntzakis. 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. 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 * 3. The name of the author may not be used to endorse or promote products 16 * derived from this software without specific prior written permission. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 19 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 20 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 21 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 23 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 24 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 25 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 26 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 27 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 28 */ 29 30 /* 31 * Original code from OpenBSD. 32 */ 33 34 35 #include <sys/param.h> 36 #include <sys/systm.h> 37 #include <sys/errno.h> 38 #include <sys/ioctl.h> 39 #include <sys/syslog.h> 40 #include <sys/device.h> 41 #include <sys/proc.h> 42 #include <sys/buf.h> 43 44 #include <machine/cpu.h> 45 #include <machine/intr.h> 46 #include <machine/bus.h> 47 #include <machine/pio.h> 48 49 #include <sys/audioio.h> 50 #include <dev/audio_if.h> 51 52 #include <dev/isa/isavar.h> 53 #include <dev/isa/isadmavar.h> 54 55 #include <dev/ic/ad1848reg.h> 56 #include <dev/isa/ad1848var.h> 57 #include <dev/ic/opl3sa3.h> 58 #include <dev/isa/ymvar.h> 59 60 61 int ym_getdev __P((void *, struct audio_device *)); 62 int ym_mixer_set_port __P((void *, mixer_ctrl_t *)); 63 int ym_mixer_get_port __P((void *, mixer_ctrl_t *)); 64 int ym_query_devinfo __P((void *, mixer_devinfo_t *)); 65 66 static void ym_mute __P((struct ym_softc *, int, int)); 67 static void ym_set_master_gain __P((struct ym_softc *, struct ad1848_volume*)); 68 static void ym_set_mic_gain __P((struct ym_softc *, struct ad1848_volume *)); 69 70 71 72 struct audio_hw_if ym_hw_if = { 73 ad1848_open, 74 ad1848_close, 75 NULL, 76 ad1848_query_encoding, 77 ad1848_set_params, 78 ad1848_round_blocksize, 79 ad1848_commit_settings, 80 ad1848_dma_init_output, 81 ad1848_dma_init_input, 82 ad1848_dma_output, 83 ad1848_dma_input, 84 ad1848_halt_out_dma, 85 ad1848_halt_in_dma, 86 NULL, 87 ym_getdev, 88 NULL, 89 ym_mixer_set_port, 90 ym_mixer_get_port, 91 ym_query_devinfo, 92 ad1848_malloc, 93 ad1848_free, 94 ad1848_round, 95 ad1848_mappage, 96 ad1848_get_props, 97 }; 98 99 100 struct audio_device ym_device = { 101 "ym,ad1848", 102 "", 103 "ym" 104 }; 105 106 static __inline int ym_read __P((struct ym_softc *, int)); 107 static __inline void ym_write __P((struct ym_softc *, int, int)); 108 109 void 110 ym_attach(sc) 111 struct ym_softc *sc; 112 { 113 struct ad1848_volume vol_mid = {220, 220}; 114 struct ad1848_volume vol_0 = {0, 0}; 115 116 sc->sc_ih = isa_intr_establish(sc->sc_ic, sc->ym_irq, IST_EDGE, 117 IPL_AUDIO, ad1848_intr, &sc->sc_ad1848); 118 119 ad1848_attach(&sc->sc_ad1848); 120 printf("\n"); 121 sc->sc_ad1848.parent = sc; 122 123 /* Establish chip in well known mode */ 124 ym_set_master_gain(sc, &vol_mid); 125 ym_set_mic_gain(sc, &vol_0); 126 sc->master_mute = 0; 127 ym_mute(sc, SA3_LCH, sc->master_mute); 128 ym_mute(sc, SA3_RCH, sc->master_mute); 129 130 sc->mic_mute = 1; 131 ym_mute(sc, SA3_MIC, sc->mic_mute); 132 133 audio_attach_mi(&ym_hw_if, 0, &sc->sc_ad1848, &sc->sc_dev); 134 } 135 136 static __inline int 137 ym_read(sc, reg) 138 struct ym_softc *sc; 139 int reg; 140 { 141 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 0, 0x1d); 142 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 0, (reg & 0xff)); 143 return (bus_space_read_1(sc->sc_iot, sc->sc_controlioh, 1)); 144 } 145 146 static __inline void 147 ym_write(sc, reg, data) 148 struct ym_softc *sc; 149 int reg; 150 int data; 151 { 152 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 0, 0x1d); 153 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 0, (reg & 0xff)); 154 bus_space_write_1(sc->sc_iot, sc->sc_controlioh, 1, (data & 0xff)); 155 } 156 157 158 159 int 160 ym_getdev(addr, retp) 161 void *addr; 162 struct audio_device *retp; 163 { 164 *retp = ym_device; 165 return 0; 166 } 167 168 169 static ad1848_devmap_t mappings[] = { 170 { YM_MIDI_LVL, AD1848_KIND_LVL, AD1848_AUX2_CHANNEL }, 171 { YM_CD_LVL, AD1848_KIND_LVL, AD1848_AUX1_CHANNEL }, 172 { YM_DAC_LVL, AD1848_KIND_LVL, AD1848_DAC_CHANNEL }, 173 { YM_LINE_LVL, AD1848_KIND_LVL, AD1848_LINE_CHANNEL }, 174 { YM_SPEAKER_LVL, AD1848_KIND_LVL, AD1848_MONO_CHANNEL }, 175 { YM_MONITOR_LVL, AD1848_KIND_LVL, AD1848_MONITOR_CHANNEL }, 176 { YM_MIDI_MUTE, AD1848_KIND_MUTE, AD1848_AUX2_CHANNEL }, 177 { YM_CD_MUTE, AD1848_KIND_MUTE, AD1848_AUX1_CHANNEL }, 178 { YM_DAC_MUTE, AD1848_KIND_MUTE, AD1848_DAC_CHANNEL }, 179 { YM_LINE_MUTE, AD1848_KIND_MUTE, AD1848_LINE_CHANNEL }, 180 { YM_SPEAKER_MUTE, AD1848_KIND_MUTE, AD1848_MONO_CHANNEL }, 181 { YM_MONITOR_MUTE, AD1848_KIND_MUTE, AD1848_MONITOR_CHANNEL }, 182 { YM_REC_LVL, AD1848_KIND_RECORDGAIN, -1 }, 183 { YM_RECORD_SOURCE, AD1848_KIND_RECORDSOURCE, -1} 184 }; 185 186 static int nummap = sizeof(mappings) / sizeof(mappings[0]); 187 188 189 static void 190 ym_mute(sc, left_reg, mute) 191 struct ym_softc *sc; 192 int left_reg; 193 int mute; 194 195 { 196 u_char reg; 197 198 if (mute) { 199 reg = ym_read(sc, left_reg); 200 ym_write (sc, left_reg, reg | 0x80); 201 } else { 202 reg = ym_read(sc, left_reg); 203 ym_write (sc, left_reg, reg & ~0x80); 204 } 205 } 206 207 #define MIC_ATTEN_BITS 0x1f 208 #define MASTER_ATTEN_BITS 0x0f 209 210 211 static void 212 ym_set_master_gain(sc, vol) 213 struct ym_softc *sc; 214 struct ad1848_volume *vol; 215 { 216 u_char reg; 217 u_int atten; 218 219 sc->master_gain = *vol; 220 221 atten = ((AUDIO_MAX_GAIN - vol->left) * MASTER_ATTEN_BITS) / 222 AUDIO_MAX_GAIN; 223 224 reg = ym_read(sc, SA3_LCH); 225 226 reg &= ~(MASTER_ATTEN_BITS); 227 reg |= atten; 228 229 ym_write (sc, SA3_LCH, reg); 230 231 atten = ((AUDIO_MAX_GAIN - vol->right) * MASTER_ATTEN_BITS) / 232 AUDIO_MAX_GAIN; 233 234 reg = ym_read(sc, SA3_RCH) & ~(MASTER_ATTEN_BITS); 235 reg |= atten; 236 237 ym_write (sc, SA3_RCH, reg); 238 } 239 240 static void 241 ym_set_mic_gain(sc, vol) 242 struct ym_softc *sc; 243 struct ad1848_volume *vol; 244 { 245 u_char reg; 246 u_int atten; 247 248 sc->mic_gain = *vol; 249 250 atten = ((AUDIO_MAX_GAIN - vol->left) * MIC_ATTEN_BITS)/AUDIO_MAX_GAIN; 251 252 reg = ym_read(sc, SA3_MIC) & ~(MIC_ATTEN_BITS); 253 reg |= atten; 254 255 ym_write (sc, SA3_MIC, reg); 256 } 257 258 int 259 ym_mixer_set_port(addr, cp) 260 void *addr; 261 mixer_ctrl_t *cp; 262 { 263 struct ad1848_softc *ac = addr; 264 struct ym_softc *sc = ac->parent; 265 struct ad1848_volume vol; 266 int error = ad1848_mixer_set_port(ac, mappings, nummap, cp); 267 268 if (error != ENXIO) 269 return (error); 270 271 error = 0; 272 273 switch (cp->dev) { 274 case YM_OUTPUT_LVL: 275 ad1848_to_vol(cp, &vol); 276 ym_set_master_gain(sc, &vol); 277 break; 278 279 case YM_OUTPUT_MUTE: 280 sc->master_mute = (cp->un.ord != 0); 281 ym_mute(sc, SA3_LCH, sc->master_mute); 282 ym_mute(sc, SA3_RCH, sc->master_mute); 283 break; 284 285 case YM_MIC_LVL: 286 if (cp->un.value.num_channels != 1) 287 error = EINVAL; 288 289 ad1848_to_vol(cp, &vol); 290 ym_set_mic_gain(sc, &vol); 291 break; 292 293 case YM_MIC_MUTE: 294 sc->mic_mute = (cp->un.ord != 0); 295 ym_mute(sc, SA3_MIC, sc->mic_mute); 296 break; 297 298 default: 299 return ENXIO; 300 /*NOTREACHED*/ 301 } 302 303 return (error); 304 } 305 306 int 307 ym_mixer_get_port(addr, cp) 308 void *addr; 309 mixer_ctrl_t *cp; 310 { 311 struct ad1848_softc *ac = addr; 312 struct ym_softc *sc = ac->parent; 313 314 int error = ad1848_mixer_get_port(ac, mappings, nummap, cp); 315 316 if (error != ENXIO) 317 return (error); 318 319 error = 0; 320 321 switch (cp->dev) { 322 case YM_OUTPUT_LVL: 323 ad1848_from_vol(cp, &sc->master_gain); 324 break; 325 326 case YM_OUTPUT_MUTE: 327 cp->un.ord = sc->master_mute; 328 break; 329 330 case YM_MIC_LVL: 331 if (cp->un.value.num_channels != 1) 332 error = EINVAL; 333 ad1848_from_vol(cp, &sc->mic_gain); 334 break; 335 336 case YM_MIC_MUTE: 337 cp->un.ord = sc->mic_mute; 338 break; 339 340 default: 341 error = ENXIO; 342 break; 343 } 344 345 return(error); 346 } 347 348 static char *mixer_classes[] = 349 { AudioCinputs, AudioCrecord, AudioCoutputs, AudioCmonitor }; 350 351 int 352 ym_query_devinfo(addr, dip) 353 void *addr; 354 mixer_devinfo_t *dip; 355 { 356 static char *mixer_port_names[] = 357 { AudioNmidi, AudioNcd, AudioNdac, AudioNline, AudioNspeaker, 358 AudioNmicrophone, AudioNmonitor}; 359 360 dip->next = dip->prev = AUDIO_MIXER_LAST; 361 362 switch(dip->index) { 363 case YM_INPUT_CLASS: /* input class descriptor */ 364 case YM_OUTPUT_CLASS: 365 case YM_MONITOR_CLASS: 366 case YM_RECORD_CLASS: 367 dip->type = AUDIO_MIXER_CLASS; 368 dip->mixer_class = dip->index; 369 strcpy(dip->label.name, 370 mixer_classes[dip->index - YM_INPUT_CLASS]); 371 break; 372 373 case YM_MIDI_LVL: 374 case YM_CD_LVL: 375 case YM_DAC_LVL: 376 case YM_LINE_LVL: 377 case YM_SPEAKER_LVL: 378 case YM_MIC_LVL: 379 case YM_MONITOR_LVL: 380 dip->type = AUDIO_MIXER_VALUE; 381 if (dip->index == YM_MONITOR_LVL) 382 dip->mixer_class = YM_MONITOR_CLASS; 383 else 384 dip->mixer_class = YM_INPUT_CLASS; 385 386 dip->next = dip->index + 7; 387 388 strcpy(dip->label.name, 389 mixer_port_names[dip->index - YM_MIDI_LVL]); 390 391 if (dip->index == YM_SPEAKER_LVL || 392 dip->index == YM_MIC_LVL) 393 dip->un.v.num_channels = 1; 394 else 395 dip->un.v.num_channels = 2; 396 397 strcpy(dip->un.v.units.name, AudioNvolume); 398 break; 399 400 case YM_MIDI_MUTE: 401 case YM_CD_MUTE: 402 case YM_DAC_MUTE: 403 case YM_LINE_MUTE: 404 case YM_SPEAKER_MUTE: 405 case YM_MIC_MUTE: 406 case YM_MONITOR_MUTE: 407 if (dip->index == YM_MONITOR_MUTE) 408 dip->mixer_class = YM_MONITOR_CLASS; 409 else 410 dip->mixer_class = YM_INPUT_CLASS; 411 dip->type = AUDIO_MIXER_ENUM; 412 dip->prev = dip->index - 7; 413 mute: 414 strcpy(dip->label.name, AudioNmute); 415 dip->un.e.num_mem = 2; 416 strcpy(dip->un.e.member[0].label.name, AudioNoff); 417 dip->un.e.member[0].ord = 0; 418 strcpy(dip->un.e.member[1].label.name, AudioNon); 419 dip->un.e.member[1].ord = 1; 420 break; 421 422 423 case YM_OUTPUT_LVL: 424 dip->type = AUDIO_MIXER_VALUE; 425 dip->mixer_class = YM_OUTPUT_CLASS; 426 dip->next = YM_OUTPUT_MUTE; 427 strcpy(dip->label.name, AudioNmaster); 428 dip->un.v.num_channels = 2; 429 strcpy(dip->un.v.units.name, AudioNvolume); 430 break; 431 432 case YM_OUTPUT_MUTE: 433 dip->mixer_class = YM_OUTPUT_CLASS; 434 dip->type = AUDIO_MIXER_ENUM; 435 dip->prev = YM_OUTPUT_LVL; 436 goto mute; 437 438 case YM_REC_LVL: /* record level */ 439 dip->type = AUDIO_MIXER_VALUE; 440 dip->mixer_class = YM_RECORD_CLASS; 441 dip->next = YM_RECORD_SOURCE; 442 strcpy(dip->label.name, AudioNrecord); 443 dip->un.v.num_channels = 2; 444 strcpy(dip->un.v.units.name, AudioNvolume); 445 break; 446 447 448 case YM_RECORD_SOURCE: 449 dip->mixer_class = YM_RECORD_CLASS; 450 dip->type = AUDIO_MIXER_ENUM; 451 dip->prev = YM_REC_LVL; 452 strcpy(dip->label.name, AudioNsource); 453 dip->un.e.num_mem = 4; 454 strcpy(dip->un.e.member[0].label.name, AudioNmicrophone); 455 dip->un.e.member[0].ord = MIC_IN_PORT; 456 strcpy(dip->un.e.member[1].label.name, AudioNline); 457 dip->un.e.member[1].ord = LINE_IN_PORT; 458 strcpy(dip->un.e.member[2].label.name, AudioNdac); 459 dip->un.e.member[2].ord = DAC_IN_PORT; 460 strcpy(dip->un.e.member[3].label.name, AudioNcd); 461 dip->un.e.member[3].ord = AUX1_IN_PORT; 462 break; 463 464 default: 465 return ENXIO; 466 /*NOTREACHED*/ 467 } 468 469 return 0; 470 } 471
Indexes created Thu Oct 02 14:10:14 GMT 2025