1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25#include "opl3_voice.h"
26#include <linux/init.h>
27#include <linux/moduleparam.h>
28#include <sound/initval.h>
29
30MODULE_AUTHOR("Uros Bizjak <uros@kss-loka.si>");
31MODULE_LICENSE("GPL");
32MODULE_DESCRIPTION("ALSA driver for OPL3 FM synth");
33
34int use_internal_drums = 0;
35module_param(use_internal_drums, bool, 0444);
36MODULE_PARM_DESC(use_internal_drums, "Enable internal OPL2/3 drums.");
37
38int snd_opl3_synth_use_inc(struct snd_opl3 * opl3)
39{
40 if (!try_module_get(opl3->card->module))
41 return -EFAULT;
42 return 0;
43
44}
45
46void snd_opl3_synth_use_dec(struct snd_opl3 * opl3)
47{
48 module_put(opl3->card->module);
49}
50
51int snd_opl3_synth_setup(struct snd_opl3 * opl3)
52{
53 int idx;
54
55 mutex_lock(&opl3->access_mutex);
56 if (opl3->used) {
57 mutex_unlock(&opl3->access_mutex);
58 return -EBUSY;
59 }
60 opl3->used++;
61 mutex_unlock(&opl3->access_mutex);
62
63 snd_opl3_reset(opl3);
64
65 for (idx = 0; idx < MAX_OPL3_VOICES; idx++) {
66 opl3->voices[idx].state = SNDRV_OPL3_ST_OFF;
67 opl3->voices[idx].time = 0;
68 opl3->voices[idx].keyon_reg = 0x00;
69 }
70 opl3->use_time = 0;
71 opl3->connection_reg = 0x00;
72 if (opl3->hardware >= OPL3_HW_OPL3) {
73
74 opl3->command(opl3, OPL3_RIGHT | OPL3_REG_CONNECTION_SELECT,
75 opl3->connection_reg);
76 opl3->max_voices = MAX_OPL3_VOICES;
77 }
78 return 0;
79}
80
81void snd_opl3_synth_cleanup(struct snd_opl3 * opl3)
82{
83 unsigned long flags;
84
85
86 spin_lock_irqsave(&opl3->sys_timer_lock, flags);
87 if (opl3->sys_timer_status) {
88 del_timer(&opl3->tlist);
89 opl3->sys_timer_status = 0;
90 }
91 spin_unlock_irqrestore(&opl3->sys_timer_lock, flags);
92
93 snd_opl3_reset(opl3);
94 mutex_lock(&opl3->access_mutex);
95 opl3->used--;
96 mutex_unlock(&opl3->access_mutex);
97}
98
99static int snd_opl3_synth_use(void *private_data, struct snd_seq_port_subscribe * info)
100{
101 struct snd_opl3 *opl3 = private_data;
102 int err;
103
104 if ((err = snd_opl3_synth_setup(opl3)) < 0)
105 return err;
106
107 if (use_internal_drums) {
108
109 opl3->voices[6].state = opl3->voices[7].state =
110 opl3->voices[8].state = SNDRV_OPL3_ST_NOT_AVAIL;
111 snd_opl3_load_drums(opl3);
112 opl3->drum_reg = OPL3_PERCUSSION_ENABLE;
113 opl3->command(opl3, OPL3_LEFT | OPL3_REG_PERCUSSION, opl3->drum_reg);
114 } else {
115 opl3->drum_reg = 0x00;
116 }
117
118 if (info->sender.client != SNDRV_SEQ_CLIENT_SYSTEM) {
119 if ((err = snd_opl3_synth_use_inc(opl3)) < 0)
120 return err;
121 }
122 opl3->synth_mode = SNDRV_OPL3_MODE_SEQ;
123 return 0;
124}
125
126static int snd_opl3_synth_unuse(void *private_data, struct snd_seq_port_subscribe * info)
127{
128 struct snd_opl3 *opl3 = private_data;
129
130 snd_opl3_synth_cleanup(opl3);
131
132 if (info->sender.client != SNDRV_SEQ_CLIENT_SYSTEM)
133 snd_opl3_synth_use_dec(opl3);
134 return 0;
135}
136
137
138
139
140struct snd_midi_op opl3_ops = {
141 .note_on = snd_opl3_note_on,
142 .note_off = snd_opl3_note_off,
143 .key_press = snd_opl3_key_press,
144 .note_terminate = snd_opl3_terminate_note,
145 .control = snd_opl3_control,
146 .nrpn = snd_opl3_nrpn,
147 .sysex = snd_opl3_sysex,
148};
149
150static int snd_opl3_synth_event_input(struct snd_seq_event * ev, int direct,
151 void *private_data, int atomic, int hop)
152{
153 struct snd_opl3 *opl3 = private_data;
154
155 if (ev->type >= SNDRV_SEQ_EVENT_INSTR_BEGIN &&
156 ev->type <= SNDRV_SEQ_EVENT_INSTR_CHANGE) {
157 if (direct) {
158 snd_seq_instr_event(&opl3->fm_ops, opl3->ilist, ev,
159 opl3->seq_client, atomic, hop);
160 }
161 } else {
162 snd_midi_process_event(&opl3_ops, ev, opl3->chset);
163 }
164 return 0;
165}
166
167
168
169static void snd_opl3_synth_free_port(void *private_data)
170{
171 struct snd_opl3 *opl3 = private_data;
172
173 snd_midi_channel_free_set(opl3->chset);
174}
175
176static int snd_opl3_synth_create_port(struct snd_opl3 * opl3)
177{
178 struct snd_seq_port_callback callbacks;
179 char name[32];
180 int voices, opl_ver;
181
182 voices = (opl3->hardware < OPL3_HW_OPL3) ?
183 MAX_OPL2_VOICES : MAX_OPL3_VOICES;
184 opl3->chset = snd_midi_channel_alloc_set(16);
185 if (opl3->chset == NULL)
186 return -ENOMEM;
187 opl3->chset->private_data = opl3;
188
189 memset(&callbacks, 0, sizeof(callbacks));
190 callbacks.owner = THIS_MODULE;
191 callbacks.use = snd_opl3_synth_use;
192 callbacks.unuse = snd_opl3_synth_unuse;
193 callbacks.event_input = snd_opl3_synth_event_input;
194 callbacks.private_free = snd_opl3_synth_free_port;
195 callbacks.private_data = opl3;
196
197 opl_ver = (opl3->hardware & OPL3_HW_MASK) >> 8;
198 sprintf(name, "OPL%i FM Port", opl_ver);
199
200 opl3->chset->client = opl3->seq_client;
201 opl3->chset->port = snd_seq_event_port_attach(opl3->seq_client, &callbacks,
202 SNDRV_SEQ_PORT_CAP_WRITE |
203 SNDRV_SEQ_PORT_CAP_SUBS_WRITE,
204 SNDRV_SEQ_PORT_TYPE_MIDI_GENERIC |
205 SNDRV_SEQ_PORT_TYPE_MIDI_GM |
206 SNDRV_SEQ_PORT_TYPE_DIRECT_SAMPLE |
207 SNDRV_SEQ_PORT_TYPE_HARDWARE |
208 SNDRV_SEQ_PORT_TYPE_SYNTHESIZER,
209 16, voices,
210 name);
211 if (opl3->chset->port < 0) {
212 int port;
213 port = opl3->chset->port;
214 snd_midi_channel_free_set(opl3->chset);
215 return port;
216 }
217 return 0;
218}
219
220
221
222static int snd_opl3_seq_new_device(struct snd_seq_device *dev)
223{
224 struct snd_opl3 *opl3;
225 int client, err;
226 char name[32];
227 int opl_ver;
228
229 opl3 = *(struct snd_opl3 **)SNDRV_SEQ_DEVICE_ARGPTR(dev);
230 if (opl3 == NULL)
231 return -EINVAL;
232
233 spin_lock_init(&opl3->voice_lock);
234
235 opl3->seq_client = -1;
236
237
238 opl_ver = (opl3->hardware & OPL3_HW_MASK) >> 8;
239 sprintf(name, "OPL%i FM synth", opl_ver);
240 client = opl3->seq_client =
241 snd_seq_create_kernel_client(opl3->card, opl3->seq_dev_num,
242 name);
243 if (client < 0)
244 return client;
245
246 if ((err = snd_opl3_synth_create_port(opl3)) < 0) {
247 snd_seq_delete_kernel_client(client);
248 opl3->seq_client = -1;
249 return err;
250 }
251
252
253 opl3->ilist = snd_seq_instr_list_new();
254 if (opl3->ilist == NULL) {
255 snd_seq_delete_kernel_client(client);
256 opl3->seq_client = -1;
257 return -ENOMEM;
258 }
259 opl3->ilist->flags = SNDRV_SEQ_INSTR_FLG_DIRECT;
260 snd_seq_fm_init(&opl3->fm_ops, NULL);
261
262
263 init_timer(&opl3->tlist);
264 opl3->tlist.function = snd_opl3_timer_func;
265 opl3->tlist.data = (unsigned long) opl3;
266 spin_lock_init(&opl3->sys_timer_lock);
267 opl3->sys_timer_status = 0;
268
269#ifdef CONFIG_SND_SEQUENCER_OSS
270 snd_opl3_init_seq_oss(opl3, name);
271#endif
272 return 0;
273}
274
275static int snd_opl3_seq_delete_device(struct snd_seq_device *dev)
276{
277 struct snd_opl3 *opl3;
278
279 opl3 = *(struct snd_opl3 **)SNDRV_SEQ_DEVICE_ARGPTR(dev);
280 if (opl3 == NULL)
281 return -EINVAL;
282
283#ifdef CONFIG_SND_SEQUENCER_OSS
284 snd_opl3_free_seq_oss(opl3);
285#endif
286 if (opl3->seq_client >= 0) {
287 snd_seq_delete_kernel_client(opl3->seq_client);
288 opl3->seq_client = -1;
289 }
290 if (opl3->ilist)
291 snd_seq_instr_list_free(&opl3->ilist);
292 return 0;
293}
294
295static int __init alsa_opl3_seq_init(void)
296{
297 static struct snd_seq_dev_ops ops =
298 {
299 snd_opl3_seq_new_device,
300 snd_opl3_seq_delete_device
301 };
302
303 return snd_seq_device_register_driver(SNDRV_SEQ_DEV_ID_OPL3, &ops,
304 sizeof(struct snd_opl3 *));
305}
306
307static void __exit alsa_opl3_seq_exit(void)
308{
309 snd_seq_device_unregister_driver(SNDRV_SEQ_DEV_ID_OPL3);
310}
311
312module_init(alsa_opl3_seq_init)
313module_exit(alsa_opl3_seq_exit)
314
