emu10kx-midi.c revision 160383
1160383Snetchild/*- 2160383Snetchild * Copyright (c) 1999 Seigo Tanimura 3160383Snetchild * (c) 2003 Mathew Kanner 4160383Snetchild * Copyright (c) 2003-2006 Yuriy Tsibizov <yuriy.tsibizov@gfk.ru> 5160383Snetchild * All rights reserved 6160383Snetchild * 7160383Snetchild * Redistribution and use in source and binary forms, with or without 8160383Snetchild * modification, are permitted provided that the following conditions 9160383Snetchild * are met: 10160383Snetchild * 1. Redistributions of source code must retain the above copyright 11160383Snetchild * notice, this list of conditions and the following disclaimer. 12160383Snetchild * 2. Redistributions in binary form must reproduce the above copyright 13160383Snetchild * notice, this list of conditions and the following disclaimer in the 14160383Snetchild * documentation and/or other materials provided with the distribution. 15160383Snetchild * 16160383Snetchild * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17160383Snetchild * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18160383Snetchild * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19160383Snetchild * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20160383Snetchild * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21160383Snetchild * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22160383Snetchild * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23160383Snetchild * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24160383Snetchild * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25160383Snetchild * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26160383Snetchild * SUCH DAMAGE. 27160383Snetchild * 28160383Snetchild * $FreeBSD: head/sys/dev/sound/pci/emu10kx-midi.c 160383 2006-07-15 19:36:28Z netchild $ 29160383Snetchild */ 30160383Snetchild 31160383Snetchild#include <sys/param.h> 32160383Snetchild#include <sys/types.h> 33160383Snetchild#include <sys/bus.h> 34160383Snetchild#include <machine/bus.h> 35160383Snetchild#include <sys/rman.h> 36160383Snetchild#include <sys/systm.h> 37160383Snetchild#include <sys/sbuf.h> 38160383Snetchild#include <sys/queue.h> 39160383Snetchild#include <sys/lock.h> 40160383Snetchild#include <sys/mutex.h> 41160383Snetchild 42160383Snetchild#include <dev/sound/chip.h> 43160383Snetchild#include <dev/sound/pcm/sound.h> 44160383Snetchild 45160383Snetchild#include <dev/sound/midi/midi.h> 46160383Snetchild#include <dev/sound/midi/mpu401.h> 47160383Snetchild#include "mpufoi_if.h" 48160383Snetchild 49160383Snetchild#include "opt_emu10kx.h" 50160383Snetchild#include <dev/sound/pci/emu10kx.h> 51160383Snetchild#include "emu10k1-alsa%diked.h" 52160383Snetchild 53160383Snetchildstruct emu_midi_softc { 54160383Snetchild struct mtx mtx; 55160383Snetchild device_t dev; 56160383Snetchild struct mpu401 *mpu; 57160383Snetchild mpu401_intr_t *mpu_intr; 58160383Snetchild struct emu_sc_info *card; 59160383Snetchild int port; /* I/O port or I/O ptr reg */ 60160383Snetchild int is_emu10k1; 61160383Snetchild int fflags; /* File flags */ 62160383Snetchild int ihandle; /* interrupt manager handle */ 63160383Snetchild}; 64160383Snetchild 65160383Snetchildstatic uint32_t emu_midi_card_intr(void *p, uint32_t arg); 66160383Snetchildstatic devclass_t emu_midi_devclass; 67160383Snetchild 68160383Snetchildstatic unsigned char 69160383Snetchildemu_mread(void *arg __unused, struct emu_midi_softc *sc, int reg) 70160383Snetchild{ 71160383Snetchild unsigned int d; 72160383Snetchild 73160383Snetchild d = 0; 74160383Snetchild if (sc->is_emu10k1) 75160383Snetchild d = emu_rd(sc->card, 0x18 + reg, 1); 76160383Snetchild else 77160383Snetchild d = emu_rdptr(sc->card, 0, sc->port + reg); 78160383Snetchild 79160383Snetchild return (d); 80160383Snetchild} 81160383Snetchild 82160383Snetchildstatic void 83160383Snetchildemu_mwrite(void *arg __unused, struct emu_midi_softc *sc, int reg, unsigned char b) 84160383Snetchild{ 85160383Snetchild 86160383Snetchild if (sc->is_emu10k1) 87160383Snetchild emu_wr(sc->card, 0x18 + reg, b, 1); 88160383Snetchild else 89160383Snetchild emu_wrptr(sc->card, 0, sc->port + reg, b); 90160383Snetchild} 91160383Snetchild 92160383Snetchildstatic int 93160383Snetchildemu_muninit(void *arg __unused, struct emu_midi_softc *sc) 94160383Snetchild{ 95160383Snetchild 96160383Snetchild mtx_lock(&sc->mtx); 97160383Snetchild sc->mpu_intr = NULL; 98160383Snetchild mtx_unlock(&sc->mtx); 99160383Snetchild 100160383Snetchild return (0); 101160383Snetchild} 102160383Snetchild 103160383Snetchildstatic kobj_method_t emu_mpu_methods[] = { 104160383Snetchild KOBJMETHOD(mpufoi_read, emu_mread), 105160383Snetchild KOBJMETHOD(mpufoi_write, emu_mwrite), 106160383Snetchild KOBJMETHOD(mpufoi_uninit, emu_muninit), 107160383Snetchild {0, 0} 108160383Snetchild}; 109160383SnetchildDEFINE_CLASS(emu_mpu, emu_mpu_methods, 0); 110160383Snetchild 111160383Snetchildstatic uint32_t 112160383Snetchildemu_midi_card_intr(void *p, uint32_t intr_status) 113160383Snetchild{ 114160383Snetchild struct emu_midi_softc *sc = (struct emu_midi_softc *)p; 115160383Snetchild if (sc->mpu_intr) 116160383Snetchild (sc->mpu_intr) (sc->mpu); 117160383Snetchild if (sc->mpu_intr == NULL) { 118160383Snetchild /* We should read MIDI event to unlock card after 119160383Snetchild * interrupt. XXX - check, why this happens. */ 120160383Snetchild#ifdef SND_EMU10KX_DEBUG 121160383Snetchild device_printf(sc->dev, "midi interrupt %08x without interrupt handler, force mread!\n", intr_status); 122160383Snetchild#endif 123160383Snetchild (void)emu_mread((void *)(NULL), sc, 0); 124160383Snetchild } 125160383Snetchild return (intr_status); /* Acknowledge everything */ 126160383Snetchild} 127160383Snetchild 128160383Snetchildstatic void 129160383Snetchildemu_midi_intr(void *p) 130160383Snetchild{ 131160383Snetchild (void)emu_midi_card_intr(p, 0); 132160383Snetchild} 133160383Snetchild 134160383Snetchildstatic int 135160383Snetchildemu_midi_probe(device_t dev) 136160383Snetchild{ 137160383Snetchild struct emu_midi_softc *scp; 138160383Snetchild uintptr_t func, r; 139160383Snetchild 140160383Snetchild r = BUS_READ_IVAR(device_get_parent(dev), dev, 0, &func); 141160383Snetchild if (func != SCF_MIDI) 142160383Snetchild return (ENXIO); 143160383Snetchild 144160383Snetchild scp = device_get_softc(dev); 145160383Snetchild bzero(scp, sizeof(*scp)); 146160383Snetchild r = BUS_READ_IVAR(device_get_parent(dev), dev, EMU_VAR_ISEMU10K1, &(scp->is_emu10k1)); 147160383Snetchild 148160383Snetchild device_set_desc(dev, "EMU10Kx MIDI Interface"); 149160383Snetchild return (0); 150160383Snetchild} 151160383Snetchild 152160383Snetchildstatic int 153160383Snetchildemu_midi_attach(device_t dev) 154160383Snetchild{ 155160383Snetchild struct emu_midi_softc * scp; 156160383Snetchild struct sndcard_func *func; 157160383Snetchild struct emu_midiinfo *midiinfo; 158160383Snetchild uint32_t inte_val, ipr_val; 159160383Snetchild 160160383Snetchild scp = device_get_softc(dev); 161160383Snetchild func = device_get_ivars(dev); 162160383Snetchild 163160383Snetchild scp->dev = dev; 164160383Snetchild midiinfo = (struct emu_midiinfo *)func->varinfo; 165160383Snetchild scp->port = midiinfo->port; 166160383Snetchild scp->card = midiinfo->card; 167160383Snetchild 168160383Snetchild mtx_init(&scp->mtx, "emu10kx_midi", NULL, MTX_DEF); 169160383Snetchild 170160383Snetchild if (scp->is_emu10k1) { 171160383Snetchild /* SB Live! - only one MIDI device here */ 172160383Snetchild inte_val = 0; 173160383Snetchild /* inte_val |= INTE_MIDITXENABLE;*/ 174160383Snetchild inte_val |= INTE_MIDIRXENABLE; 175160383Snetchild ipr_val = IPR_MIDITRANSBUFEMPTY; 176160383Snetchild ipr_val |= IPR_MIDIRECVBUFEMPTY; 177160383Snetchild } else { 178160383Snetchild if (scp->port == A_MUDATA1) { 179160383Snetchild /* EXTERNAL MIDI (AudigyDrive) */ 180160383Snetchild inte_val = 0; 181160383Snetchild /* inte_val |= A_INTE_MIDITXENABLE1;*/ 182160383Snetchild inte_val |= INTE_MIDIRXENABLE; 183160383Snetchild ipr_val = IPR_MIDITRANSBUFEMPTY; 184160383Snetchild ipr_val |= IPR_MIDIRECVBUFEMPTY; 185160383Snetchild } else { 186160383Snetchild /* MIDI hw config port 2 */ 187160383Snetchild inte_val = 0; 188160383Snetchild /* inte_val |= A_INTE_MIDITXENABLE2;*/ 189160383Snetchild inte_val |= INTE_A_MIDIRXENABLE2; 190160383Snetchild ipr_val = IPR_A_MIDITRANSBUFEMPTY2; 191160383Snetchild ipr_val |= IPR_A_MIDIRECVBUFEMPTY2; 192160383Snetchild } 193160383Snetchild } 194160383Snetchild if (inte_val == 0) 195160383Snetchild return (ENXIO); 196160383Snetchild 197160383Snetchild scp->ihandle = emu_intr_register(scp->card, inte_val, ipr_val, &emu_midi_card_intr, scp); 198160383Snetchild /* Init the interface. */ 199160383Snetchild scp->mpu = mpu401_init(&emu_mpu_class, scp, emu_midi_intr, &scp->mpu_intr); 200160383Snetchild if (scp->mpu == NULL) { 201160383Snetchild emu_intr_unregister(scp->card, scp->ihandle); 202160383Snetchild mtx_destroy(&scp->mtx); 203160383Snetchild return (ENOMEM); 204160383Snetchild } 205160383Snetchild /* 206160383Snetchild * XXX I don't know how to check for Live!Drive / AudigyDrive 207160383Snetchild * presence. Let's hope that IR enabling code will not harm if 208160383Snetchild * it is not present. 209160383Snetchild */ 210160383Snetchild if (scp->is_emu10k1) 211160383Snetchild emu_enable_ir(scp->card); 212160383Snetchild else { 213160383Snetchild if (scp->port == A_MUDATA1) 214160383Snetchild emu_enable_ir(scp->card); 215160383Snetchild } 216160383Snetchild 217160383Snetchild return (0); 218160383Snetchild} 219160383Snetchild 220160383Snetchild 221160383Snetchildstatic int 222160383Snetchildemu_midi_detach(device_t dev) 223160383Snetchild{ 224160383Snetchild struct emu_midi_softc *scp; 225160383Snetchild 226160383Snetchild scp = device_get_softc(dev); 227160383Snetchild mpu401_uninit(scp->mpu); 228160383Snetchild emu_intr_unregister(scp->card, scp->ihandle); 229160383Snetchild mtx_destroy(&scp->mtx); 230160383Snetchild return (0); 231160383Snetchild} 232160383Snetchild 233160383Snetchildstatic device_method_t emu_midi_methods[] = { 234160383Snetchild DEVMETHOD(device_probe, emu_midi_probe), 235160383Snetchild DEVMETHOD(device_attach, emu_midi_attach), 236160383Snetchild DEVMETHOD(device_detach, emu_midi_detach), 237160383Snetchild 238160383Snetchild {0, 0}, 239160383Snetchild}; 240160383Snetchild 241160383Snetchildstatic driver_t emu_midi_driver = { 242160383Snetchild "midi", 243160383Snetchild emu_midi_methods, 244160383Snetchild sizeof(struct emu_midi_softc), 245160383Snetchild}; 246160383SnetchildDRIVER_MODULE(snd_emu10kx_midi, emu10kx, emu_midi_driver, emu_midi_devclass, 0, 0); 247160383SnetchildMODULE_DEPEND(snd_emu10kx_midi, snd_emu10kx, SND_EMU10KX_MINVER, SND_EMU10KX_PREFVER, SND_EMU10KX_MAXVER); 248160383SnetchildMODULE_DEPEND(snd_emu10kx_midi, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER); 249160383SnetchildMODULE_VERSION(snd_emu10kx_midi, SND_EMU10KX_PREFVER); 250