Linux-2.6.12-rc2
[linux-2.6.git] / sound / drivers / opl4 / opl4_seq.c
1 /*
2  * OPL4 sequencer functions
3  *
4  * Copyright (c) 2003 by Clemens Ladisch <clemens@ladisch.de>
5  * 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  *    without modification.
13  * 2. The name of the author may not be used to endorse or promote products
14  *    derived from this software without specific prior written permission.
15  *
16  * Alternatively, this software may be distributed and/or modified under the
17  * terms of the GNU General Public License as published by the Free Software
18  * Foundation; either version 2 of the License, or (at your option) any later
19  * version.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
25  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33
34 #include "opl4_local.h"
35 #include <linux/init.h>
36 #include <linux/moduleparam.h>
37 #include <sound/initval.h>
38
39 MODULE_AUTHOR("Clemens Ladisch <clemens@ladisch.de>");
40 MODULE_DESCRIPTION("OPL4 wavetable synth driver");
41 MODULE_LICENSE("Dual BSD/GPL");
42
43 int volume_boost = 8;
44
45 module_param(volume_boost, int, 0644);
46 MODULE_PARM_DESC(volume_boost, "Additional volume for OPL4 wavetable sounds.");
47
48 static int snd_opl4_seq_use_inc(opl4_t *opl4)
49 {
50         if (!try_module_get(opl4->card->module))
51                 return -EFAULT;
52         return 0;
53 }
54
55 static void snd_opl4_seq_use_dec(opl4_t *opl4)
56 {
57         module_put(opl4->card->module);
58 }
59
60 static int snd_opl4_seq_use(void *private_data, snd_seq_port_subscribe_t *info)
61 {
62         opl4_t *opl4 = private_data;
63         int err;
64
65         down(&opl4->access_mutex);
66
67         if (opl4->used) {
68                 up(&opl4->access_mutex);
69                 return -EBUSY;
70         }
71         opl4->used++;
72
73         if (info->sender.client != SNDRV_SEQ_CLIENT_SYSTEM) {
74                 err = snd_opl4_seq_use_inc(opl4);
75                 if (err < 0) {
76                         up(&opl4->access_mutex);
77                         return err;
78                 }
79         }
80
81         up(&opl4->access_mutex);
82
83         snd_opl4_synth_reset(opl4);
84         return 0;
85 }
86
87 static int snd_opl4_seq_unuse(void *private_data, snd_seq_port_subscribe_t *info)
88 {
89         opl4_t *opl4 = private_data;
90
91         snd_opl4_synth_shutdown(opl4);
92
93         down(&opl4->access_mutex);
94         opl4->used--;
95         up(&opl4->access_mutex);
96
97         if (info->sender.client != SNDRV_SEQ_CLIENT_SYSTEM)
98                 snd_opl4_seq_use_dec(opl4);
99         return 0;
100 }
101
102 static snd_midi_op_t opl4_ops = {
103         .note_on =              snd_opl4_note_on,
104         .note_off =             snd_opl4_note_off,
105         .note_terminate =       snd_opl4_terminate_note,
106         .control =              snd_opl4_control,
107         .sysex =                snd_opl4_sysex,
108 };
109
110 static int snd_opl4_seq_event_input(snd_seq_event_t *ev, int direct,
111                                     void *private_data, int atomic, int hop)
112 {
113         opl4_t *opl4 = private_data;
114
115         snd_midi_process_event(&opl4_ops, ev, opl4->chset);
116         return 0;
117 }
118
119 static void snd_opl4_seq_free_port(void *private_data)
120 {
121         opl4_t *opl4 = private_data;
122
123         snd_midi_channel_free_set(opl4->chset);
124 }
125
126 static int snd_opl4_seq_new_device(snd_seq_device_t *dev)
127 {
128         opl4_t *opl4;
129         int client;
130         snd_seq_client_callback_t callbacks;
131         snd_seq_client_info_t cinfo;
132         snd_seq_port_callback_t pcallbacks;
133
134         opl4 = *(opl4_t **)SNDRV_SEQ_DEVICE_ARGPTR(dev);
135         if (!opl4)
136                 return -EINVAL;
137
138         if (snd_yrw801_detect(opl4) < 0)
139                 return -ENODEV;
140
141         opl4->chset = snd_midi_channel_alloc_set(16);
142         if (!opl4->chset)
143                 return -ENOMEM;
144         opl4->chset->private_data = opl4;
145
146         /* allocate new client */
147         memset(&callbacks, 0, sizeof(callbacks));
148         callbacks.private_data = opl4;
149         callbacks.allow_output = callbacks.allow_input = 1;
150         client = snd_seq_create_kernel_client(opl4->card, opl4->seq_dev_num, &callbacks);
151         if (client < 0) {
152                 snd_midi_channel_free_set(opl4->chset);
153                 return client;
154         }
155         opl4->seq_client = client;
156         opl4->chset->client = client;
157
158         /* change name of client */
159         memset(&cinfo, 0, sizeof(cinfo));
160         cinfo.client = client;
161         cinfo.type = KERNEL_CLIENT;
162         strcpy(cinfo.name, "OPL4 Wavetable");
163         snd_seq_kernel_client_ctl(client, SNDRV_SEQ_IOCTL_SET_CLIENT_INFO, &cinfo);
164
165         /* create new port */
166         memset(&pcallbacks, 0, sizeof(pcallbacks));
167         pcallbacks.owner = THIS_MODULE;
168         pcallbacks.use = snd_opl4_seq_use;
169         pcallbacks.unuse = snd_opl4_seq_unuse;
170         pcallbacks.event_input = snd_opl4_seq_event_input;
171         pcallbacks.private_free = snd_opl4_seq_free_port;
172         pcallbacks.private_data = opl4;
173
174         opl4->chset->port = snd_seq_event_port_attach(client, &pcallbacks,
175                                                       SNDRV_SEQ_PORT_CAP_WRITE |
176                                                       SNDRV_SEQ_PORT_CAP_SUBS_WRITE,
177                                                       SNDRV_SEQ_PORT_TYPE_MIDI_GENERIC |
178                                                       SNDRV_SEQ_PORT_TYPE_MIDI_GM,
179                                                       16, 24,
180                                                       "OPL4 Wavetable Port");
181         if (opl4->chset->port < 0) {
182                 int err = opl4->chset->port;
183                 snd_midi_channel_free_set(opl4->chset);
184                 snd_seq_delete_kernel_client(client);
185                 opl4->seq_client = -1;
186                 return err;
187         }
188         return 0;
189 }
190
191 static int snd_opl4_seq_delete_device(snd_seq_device_t *dev)
192 {
193         opl4_t *opl4;
194
195         opl4 = *(opl4_t **)SNDRV_SEQ_DEVICE_ARGPTR(dev);
196         if (!opl4)
197                 return -EINVAL;
198
199         if (opl4->seq_client >= 0) {
200                 snd_seq_delete_kernel_client(opl4->seq_client);
201                 opl4->seq_client = -1;
202         }
203         return 0;
204 }
205
206 static int __init alsa_opl4_synth_init(void)
207 {
208         static snd_seq_dev_ops_t ops = {
209                 snd_opl4_seq_new_device,
210                 snd_opl4_seq_delete_device
211         };
212
213         return snd_seq_device_register_driver(SNDRV_SEQ_DEV_ID_OPL4, &ops,
214                                               sizeof(opl4_t*));
215 }
216
217 static void __exit alsa_opl4_synth_exit(void)
218 {
219         snd_seq_device_unregister_driver(SNDRV_SEQ_DEV_ID_OPL4);
220 }
221
222 module_init(alsa_opl4_synth_init)
223 module_exit(alsa_opl4_synth_exit)