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