1 /* 2 * Midi Sequencer interface routines. 3 * 4 * Copyright (C) 1999 Steve Ratcliffe 5 * Copyright (c) 1999-2000 Takashi Iwai <tiwai@suse.de> 6 * 7 * This program is free software; you can redistribute it and/or modify 8 * it under the terms of the GNU General Public License as published by 9 * the Free Software Foundation; either version 2 of the License, or 10 * (at your option) any later version. 11 * 12 * This program is distributed in the hope that it will be useful, 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * GNU General Public License for more details. 16 * 17 * You should have received a copy of the GNU General Public License 18 * along with this program; if not, write to the Free Software 19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 20 */ 21 22 #include "emux_voice.h" 23 #include <linux/slab.h> 24 25 26 /* Prototypes for static functions */ 27 static void free_port(void *private); 28 static void snd_emux_init_port(struct snd_emux_port *p); 29 static int snd_emux_use(void *private_data, struct snd_seq_port_subscribe *info); 30 static int snd_emux_unuse(void *private_data, struct snd_seq_port_subscribe *info); 31 32 /* 33 * MIDI emulation operators 34 */ 35 static struct snd_midi_op emux_ops = { 36 snd_emux_note_on, 37 snd_emux_note_off, 38 snd_emux_key_press, 39 snd_emux_terminate_note, 40 snd_emux_control, 41 snd_emux_nrpn, 42 snd_emux_sysex, 43 }; 44 45 46 /* 47 * number of MIDI channels 48 */ 49 #define MIDI_CHANNELS 16 50 51 /* 52 * type flags for MIDI sequencer port 53 */ 54 #define DEFAULT_MIDI_TYPE (SNDRV_SEQ_PORT_TYPE_MIDI_GENERIC |\ 55 SNDRV_SEQ_PORT_TYPE_MIDI_GM |\ 56 SNDRV_SEQ_PORT_TYPE_MIDI_GS |\ 57 SNDRV_SEQ_PORT_TYPE_MIDI_XG |\ 58 SNDRV_SEQ_PORT_TYPE_DIRECT_SAMPLE) 59 60 /* 61 * Initialise the EMUX Synth by creating a client and registering 62 * a series of ports. 63 * Each of the ports will contain the 16 midi channels. Applications 64 * can connect to these ports to play midi data. 65 */ 66 int 67 snd_emux_init_seq(struct snd_emux *emu, struct snd_card *card, int index) 68 { 69 int i; 70 struct snd_seq_port_callback pinfo; 71 char tmpname[64]; 72 73 emu->client = snd_seq_create_kernel_client(card, index, 74 "%s WaveTable", emu->name); 75 if (emu->client < 0) { 76 snd_printk("can't create client\n"); 77 return -ENODEV; 78 } 79 80 if (emu->num_ports < 0) { 81 snd_printk("seqports must be greater than zero\n"); 82 emu->num_ports = 1; 83 } else if (emu->num_ports >= SNDRV_EMUX_MAX_PORTS) { 84 snd_printk("too many ports." 85 "limited max. ports %d\n", SNDRV_EMUX_MAX_PORTS); 86 emu->num_ports = SNDRV_EMUX_MAX_PORTS; 87 } 88 89 memset(&pinfo, 0, sizeof(pinfo)); 90 pinfo.owner = THIS_MODULE; 91 pinfo.use = snd_emux_use; 92 pinfo.unuse = snd_emux_unuse; 93 pinfo.event_input = snd_emux_event_input; 94 95 for (i = 0; i < emu->num_ports; i++) { 96 struct snd_emux_port *p; 97 98 sprintf(tmpname, "%s Port %d", emu->name, i); 99 p = snd_emux_create_port(emu, tmpname, MIDI_CHANNELS, 100 0, &pinfo); 101 if (p == NULL) { 102 snd_printk("can't create port\n"); 103 return -ENOMEM; 104 } 105 106 p->port_mode = SNDRV_EMUX_PORT_MODE_MIDI; 107 snd_emux_init_port(p); 108 emu->ports[i] = p->chset.port; 109 emu->portptrs[i] = p; 110 } 111 112 return 0; 113 } 114 115 116 /* 117 * Detach from the ports that were set up for this synthesizer and 118 * destroy the kernel client. 119 */ 120 void 121 snd_emux_detach_seq(struct snd_emux *emu) 122 { 123 if (emu->voices) 124 snd_emux_terminate_all(emu); 125 126 down(&emu->register_mutex); 127 if (emu->client >= 0) { 128 snd_seq_delete_kernel_client(emu->client); 129 emu->client = -1; 130 } 131 up(&emu->register_mutex); 132 } 133 134 135 /* 136 * create a sequencer port and channel_set 137 */ 138 139 struct snd_emux_port * 140 snd_emux_create_port(struct snd_emux *emu, char *name, 141 int max_channels, int oss_port, 142 struct snd_seq_port_callback *callback) 143 { 144 struct snd_emux_port *p; 145 int i, type, cap; 146 147 /* Allocate structures for this channel */ 148 if ((p = kzalloc(sizeof(*p), GFP_KERNEL)) == NULL) { 149 snd_printk("no memory\n"); 150 return NULL; 151 } 152 p->chset.channels = kcalloc(max_channels, sizeof(struct snd_midi_channel), GFP_KERNEL); 153 if (p->chset.channels == NULL) { 154 snd_printk("no memory\n"); 155 kfree(p); 156 return NULL; 157 } 158 for (i = 0; i < max_channels; i++) 159 p->chset.channels[i].number = i; 160 p->chset.private_data = p; 161 p->chset.max_channels = max_channels; 162 p->emu = emu; 163 p->chset.client = emu->client; 164 #ifdef SNDRV_EMUX_USE_RAW_EFFECT 165 snd_emux_create_effect(p); 166 #endif 167 callback->private_free = free_port; 168 callback->private_data = p; 169 170 cap = SNDRV_SEQ_PORT_CAP_WRITE; 171 if (oss_port) { 172 type = SNDRV_SEQ_PORT_TYPE_SPECIFIC; 173 } else { 174 type = DEFAULT_MIDI_TYPE; 175 cap |= SNDRV_SEQ_PORT_CAP_SUBS_WRITE; 176 } 177 178 p->chset.port = snd_seq_event_port_attach(emu->client, callback, 179 cap, type, max_channels, 180 emu->max_voices, name); 181 182 return p; 183 } 184 185 186 /* 187 * release memory block for port 188 */ 189 static void 190 free_port(void *private_data) 191 { 192 struct snd_emux_port *p; 193 194 p = private_data; 195 if (p) { 196 #ifdef SNDRV_EMUX_USE_RAW_EFFECT 197 snd_emux_delete_effect(p); 198 #endif 199 kfree(p->chset.channels); 200 kfree(p); 201 } 202 } 203 204 205 #define DEFAULT_DRUM_FLAGS (1<<9) 206 207 /* 208 * initialize the port specific parameters 209 */ 210 static void 211 snd_emux_init_port(struct snd_emux_port *p) 212 { 213 p->drum_flags = DEFAULT_DRUM_FLAGS; 214 p->volume_atten = 0; 215 216 snd_emux_reset_port(p); 217 } 218 219 220 /* 221 * reset port 222 */ 223 void 224 snd_emux_reset_port(struct snd_emux_port *port) 225 { 226 int i; 227 228 /* stop all sounds */ 229 snd_emux_sounds_off_all(port); 230 231 snd_midi_channel_set_clear(&port->chset); 232 233 #ifdef SNDRV_EMUX_USE_RAW_EFFECT 234 snd_emux_clear_effect(port); 235 #endif 236 237 /* set port specific control parameters */ 238 port->ctrls[EMUX_MD_DEF_BANK] = 0; 239 port->ctrls[EMUX_MD_DEF_DRUM] = 0; 240 port->ctrls[EMUX_MD_REALTIME_PAN] = 1; 241 242 for (i = 0; i < port->chset.max_channels; i++) { 243 struct snd_midi_channel *chan = port->chset.channels + i; 244 chan->drum_channel = ((port->drum_flags >> i) & 1) ? 1 : 0; 245 } 246 } 247 248 249 /* 250 * input sequencer event 251 */ 252 int 253 snd_emux_event_input(struct snd_seq_event *ev, int direct, void *private_data, 254 int atomic, int hop) 255 { 256 struct snd_emux_port *port; 257 258 port = private_data; 259 snd_assert(port != NULL && ev != NULL, return -EINVAL); 260 261 snd_midi_process_event(&emux_ops, ev, &port->chset); 262 263 return 0; 264 } 265 266 267 /* 268 * increment usage count 269 */ 270 int 271 snd_emux_inc_count(struct snd_emux *emu) 272 { 273 emu->used++; 274 if (!try_module_get(emu->ops.owner)) 275 goto __error; 276 if (!try_module_get(emu->card->module)) { 277 module_put(emu->ops.owner); 278 __error: 279 emu->used--; 280 return 0; 281 } 282 return 1; 283 } 284 285 286 /* 287 * decrease usage count 288 */ 289 void 290 snd_emux_dec_count(struct snd_emux *emu) 291 { 292 module_put(emu->card->module); 293 emu->used--; 294 if (emu->used <= 0) 295 snd_emux_terminate_all(emu); 296 module_put(emu->ops.owner); 297 } 298 299 300 /* 301 * Routine that is called upon a first use of a particular port 302 */ 303 static int 304 snd_emux_use(void *private_data, struct snd_seq_port_subscribe *info) 305 { 306 struct snd_emux_port *p; 307 struct snd_emux *emu; 308 309 p = private_data; 310 snd_assert(p != NULL, return -EINVAL); 311 emu = p->emu; 312 snd_assert(emu != NULL, return -EINVAL); 313 314 down(&emu->register_mutex); 315 snd_emux_init_port(p); 316 snd_emux_inc_count(emu); 317 up(&emu->register_mutex); 318 return 0; 319 } 320 321 /* 322 * Routine that is called upon the last unuse() of a particular port. 323 */ 324 static int 325 snd_emux_unuse(void *private_data, struct snd_seq_port_subscribe *info) 326 { 327 struct snd_emux_port *p; 328 struct snd_emux *emu; 329 330 p = private_data; 331 snd_assert(p != NULL, return -EINVAL); 332 emu = p->emu; 333 snd_assert(emu != NULL, return -EINVAL); 334 335 down(&emu->register_mutex); 336 snd_emux_sounds_off_all(p); 337 snd_emux_dec_count(emu); 338 up(&emu->register_mutex); 339 return 0; 340 } 341 342 343 /* 344 * attach virtual rawmidi devices 345 */ 346 int snd_emux_init_virmidi(struct snd_emux *emu, struct snd_card *card) 347 { 348 int i; 349 350 emu->vmidi = NULL; 351 if (emu->midi_ports <= 0) 352 return 0; 353 354 emu->vmidi = kcalloc(emu->midi_ports, sizeof(struct snd_rawmidi *), GFP_KERNEL); 355 if (emu->vmidi == NULL) 356 return -ENOMEM; 357 358 for (i = 0; i < emu->midi_ports; i++) { 359 struct snd_rawmidi *rmidi; 360 struct snd_virmidi_dev *rdev; 361 if (snd_virmidi_new(card, emu->midi_devidx + i, &rmidi) < 0) 362 goto __error; 363 rdev = rmidi->private_data; 364 sprintf(rmidi->name, "%s Synth MIDI", emu->name); 365 rdev->seq_mode = SNDRV_VIRMIDI_SEQ_ATTACH; 366 rdev->client = emu->client; 367 rdev->port = emu->ports[i]; 368 if (snd_device_register(card, rmidi) < 0) { 369 snd_device_free(card, rmidi); 370 goto __error; 371 } 372 emu->vmidi[i] = rmidi; 373 //snd_printk("virmidi %d ok\n", i); 374 } 375 return 0; 376 377 __error: 378 //snd_printk("error init..\n"); 379 snd_emux_delete_virmidi(emu); 380 return -ENOMEM; 381 } 382 383 int snd_emux_delete_virmidi(struct snd_emux *emu) 384 { 385 int i; 386 387 if (emu->vmidi == NULL) 388 return 0; 389 390 for (i = 0; i < emu->midi_ports; i++) { 391 if (emu->vmidi[i]) 392 snd_device_free(emu->card, emu->vmidi[i]); 393 } 394 kfree(emu->vmidi); 395 emu->vmidi = NULL; 396 return 0; 397 } 398