diff options
Diffstat (limited to 'sound/isa/sb/sb8_midi.c')
-rw-r--r-- | sound/isa/sb/sb8_midi.c | 293 |
1 files changed, 293 insertions, 0 deletions
diff --git a/sound/isa/sb/sb8_midi.c b/sound/isa/sb/sb8_midi.c new file mode 100644 index 000000000000..d2c633a40e74 --- /dev/null +++ b/sound/isa/sb/sb8_midi.c | |||
@@ -0,0 +1,293 @@ | |||
1 | /* | ||
2 | * Copyright (c) by Jaroslav Kysela <perex@suse.cz> | ||
3 | * Routines for control of SoundBlaster cards - MIDI interface | ||
4 | * | ||
5 | * This program is free software; you can redistribute it and/or modify | ||
6 | * it under the terms of the GNU General Public License as published by | ||
7 | * the Free Software Foundation; either version 2 of the License, or | ||
8 | * (at your option) any later version. | ||
9 | * | ||
10 | * This program is distributed in the hope that it will be useful, | ||
11 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
12 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
13 | * GNU General Public License for more details. | ||
14 | * | ||
15 | * You should have received a copy of the GNU General Public License | ||
16 | * along with this program; if not, write to the Free Software | ||
17 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | ||
18 | * | ||
19 | * -- | ||
20 | * | ||
21 | * Sun May 9 22:54:38 BST 1999 George David Morrison <gdm@gedamo.demon.co.uk> | ||
22 | * Fixed typo in snd_sb8dsp_midi_new_device which prevented midi from | ||
23 | * working. | ||
24 | * | ||
25 | * Sun May 11 12:34:56 UTC 2003 Clemens Ladisch <clemens@ladisch.de> | ||
26 | * Added full duplex UART mode for DSP version 2.0 and later. | ||
27 | */ | ||
28 | |||
29 | #include <sound/driver.h> | ||
30 | #include <asm/io.h> | ||
31 | #include <linux/time.h> | ||
32 | #include <sound/core.h> | ||
33 | #include <sound/sb.h> | ||
34 | |||
35 | /* | ||
36 | |||
37 | */ | ||
38 | |||
39 | irqreturn_t snd_sb8dsp_midi_interrupt(sb_t * chip) | ||
40 | { | ||
41 | snd_rawmidi_t *rmidi; | ||
42 | int max = 64; | ||
43 | char byte; | ||
44 | |||
45 | if (chip == NULL || (rmidi = chip->rmidi) == NULL) { | ||
46 | inb(SBP(chip, DATA_AVAIL)); /* ack interrupt */ | ||
47 | return IRQ_NONE; | ||
48 | } | ||
49 | spin_lock(&chip->midi_input_lock); | ||
50 | while (max-- > 0) { | ||
51 | if (inb(SBP(chip, DATA_AVAIL)) & 0x80) { | ||
52 | byte = inb(SBP(chip, READ)); | ||
53 | if (chip->open & SB_OPEN_MIDI_INPUT_TRIGGER) { | ||
54 | snd_rawmidi_receive(chip->midi_substream_input, &byte, 1); | ||
55 | } | ||
56 | } | ||
57 | } | ||
58 | spin_unlock(&chip->midi_input_lock); | ||
59 | return IRQ_HANDLED; | ||
60 | } | ||
61 | |||
62 | /* | ||
63 | |||
64 | */ | ||
65 | |||
66 | static int snd_sb8dsp_midi_input_open(snd_rawmidi_substream_t * substream) | ||
67 | { | ||
68 | unsigned long flags; | ||
69 | sb_t *chip; | ||
70 | unsigned int valid_open_flags; | ||
71 | |||
72 | chip = substream->rmidi->private_data; | ||
73 | valid_open_flags = chip->hardware >= SB_HW_20 | ||
74 | ? SB_OPEN_MIDI_OUTPUT | SB_OPEN_MIDI_OUTPUT_TRIGGER : 0; | ||
75 | spin_lock_irqsave(&chip->open_lock, flags); | ||
76 | if (chip->open & ~valid_open_flags) { | ||
77 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
78 | return -EAGAIN; | ||
79 | } | ||
80 | chip->open |= SB_OPEN_MIDI_INPUT; | ||
81 | chip->midi_substream_input = substream; | ||
82 | if (!(chip->open & SB_OPEN_MIDI_OUTPUT)) { | ||
83 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
84 | snd_sbdsp_reset(chip); /* reset DSP */ | ||
85 | if (chip->hardware >= SB_HW_20) | ||
86 | snd_sbdsp_command(chip, SB_DSP_MIDI_UART_IRQ); | ||
87 | } else { | ||
88 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
89 | } | ||
90 | return 0; | ||
91 | } | ||
92 | |||
93 | static int snd_sb8dsp_midi_output_open(snd_rawmidi_substream_t * substream) | ||
94 | { | ||
95 | unsigned long flags; | ||
96 | sb_t *chip; | ||
97 | unsigned int valid_open_flags; | ||
98 | |||
99 | chip = substream->rmidi->private_data; | ||
100 | valid_open_flags = chip->hardware >= SB_HW_20 | ||
101 | ? SB_OPEN_MIDI_INPUT | SB_OPEN_MIDI_INPUT_TRIGGER : 0; | ||
102 | spin_lock_irqsave(&chip->open_lock, flags); | ||
103 | if (chip->open & ~valid_open_flags) { | ||
104 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
105 | return -EAGAIN; | ||
106 | } | ||
107 | chip->open |= SB_OPEN_MIDI_OUTPUT; | ||
108 | chip->midi_substream_output = substream; | ||
109 | if (!(chip->open & SB_OPEN_MIDI_INPUT)) { | ||
110 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
111 | snd_sbdsp_reset(chip); /* reset DSP */ | ||
112 | if (chip->hardware >= SB_HW_20) | ||
113 | snd_sbdsp_command(chip, SB_DSP_MIDI_UART_IRQ); | ||
114 | } else { | ||
115 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
116 | } | ||
117 | return 0; | ||
118 | } | ||
119 | |||
120 | static int snd_sb8dsp_midi_input_close(snd_rawmidi_substream_t * substream) | ||
121 | { | ||
122 | unsigned long flags; | ||
123 | sb_t *chip; | ||
124 | |||
125 | chip = substream->rmidi->private_data; | ||
126 | spin_lock_irqsave(&chip->open_lock, flags); | ||
127 | chip->open &= ~(SB_OPEN_MIDI_INPUT | SB_OPEN_MIDI_INPUT_TRIGGER); | ||
128 | chip->midi_substream_input = NULL; | ||
129 | if (!(chip->open & SB_OPEN_MIDI_OUTPUT)) { | ||
130 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
131 | snd_sbdsp_reset(chip); /* reset DSP */ | ||
132 | } else { | ||
133 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
134 | } | ||
135 | return 0; | ||
136 | } | ||
137 | |||
138 | static int snd_sb8dsp_midi_output_close(snd_rawmidi_substream_t * substream) | ||
139 | { | ||
140 | unsigned long flags; | ||
141 | sb_t *chip; | ||
142 | |||
143 | chip = substream->rmidi->private_data; | ||
144 | spin_lock_irqsave(&chip->open_lock, flags); | ||
145 | chip->open &= ~(SB_OPEN_MIDI_OUTPUT | SB_OPEN_MIDI_OUTPUT_TRIGGER); | ||
146 | chip->midi_substream_output = NULL; | ||
147 | if (!(chip->open & SB_OPEN_MIDI_INPUT)) { | ||
148 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
149 | snd_sbdsp_reset(chip); /* reset DSP */ | ||
150 | } else { | ||
151 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
152 | } | ||
153 | return 0; | ||
154 | } | ||
155 | |||
156 | static void snd_sb8dsp_midi_input_trigger(snd_rawmidi_substream_t * substream, int up) | ||
157 | { | ||
158 | unsigned long flags; | ||
159 | sb_t *chip; | ||
160 | |||
161 | chip = substream->rmidi->private_data; | ||
162 | spin_lock_irqsave(&chip->open_lock, flags); | ||
163 | if (up) { | ||
164 | if (!(chip->open & SB_OPEN_MIDI_INPUT_TRIGGER)) { | ||
165 | if (chip->hardware < SB_HW_20) | ||
166 | snd_sbdsp_command(chip, SB_DSP_MIDI_INPUT_IRQ); | ||
167 | chip->open |= SB_OPEN_MIDI_INPUT_TRIGGER; | ||
168 | } | ||
169 | } else { | ||
170 | if (chip->open & SB_OPEN_MIDI_INPUT_TRIGGER) { | ||
171 | if (chip->hardware < SB_HW_20) | ||
172 | snd_sbdsp_command(chip, SB_DSP_MIDI_INPUT_IRQ); | ||
173 | chip->open &= ~SB_OPEN_MIDI_INPUT_TRIGGER; | ||
174 | } | ||
175 | } | ||
176 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
177 | } | ||
178 | |||
179 | static void snd_sb8dsp_midi_output_write(snd_rawmidi_substream_t * substream) | ||
180 | { | ||
181 | unsigned long flags; | ||
182 | sb_t *chip; | ||
183 | char byte; | ||
184 | int max = 32; | ||
185 | |||
186 | /* how big is Tx FIFO? */ | ||
187 | chip = substream->rmidi->private_data; | ||
188 | while (max-- > 0) { | ||
189 | spin_lock_irqsave(&chip->open_lock, flags); | ||
190 | if (snd_rawmidi_transmit_peek(substream, &byte, 1) != 1) { | ||
191 | chip->open &= ~SB_OPEN_MIDI_OUTPUT_TRIGGER; | ||
192 | del_timer(&chip->midi_timer); | ||
193 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
194 | break; | ||
195 | } | ||
196 | if (chip->hardware >= SB_HW_20) { | ||
197 | int timeout = 8; | ||
198 | while ((inb(SBP(chip, STATUS)) & 0x80) != 0 && --timeout > 0) | ||
199 | ; | ||
200 | if (timeout == 0) { | ||
201 | /* Tx FIFO full - try again later */ | ||
202 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
203 | break; | ||
204 | } | ||
205 | outb(byte, SBP(chip, WRITE)); | ||
206 | } else { | ||
207 | snd_sbdsp_command(chip, SB_DSP_MIDI_OUTPUT); | ||
208 | snd_sbdsp_command(chip, byte); | ||
209 | } | ||
210 | snd_rawmidi_transmit_ack(substream, 1); | ||
211 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
212 | } | ||
213 | } | ||
214 | |||
215 | static void snd_sb8dsp_midi_output_timer(unsigned long data) | ||
216 | { | ||
217 | snd_rawmidi_substream_t * substream = (snd_rawmidi_substream_t *) data; | ||
218 | sb_t * chip = substream->rmidi->private_data; | ||
219 | unsigned long flags; | ||
220 | |||
221 | spin_lock_irqsave(&chip->open_lock, flags); | ||
222 | chip->midi_timer.expires = 1 + jiffies; | ||
223 | add_timer(&chip->midi_timer); | ||
224 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
225 | snd_sb8dsp_midi_output_write(substream); | ||
226 | } | ||
227 | |||
228 | static void snd_sb8dsp_midi_output_trigger(snd_rawmidi_substream_t * substream, int up) | ||
229 | { | ||
230 | unsigned long flags; | ||
231 | sb_t *chip; | ||
232 | |||
233 | chip = substream->rmidi->private_data; | ||
234 | spin_lock_irqsave(&chip->open_lock, flags); | ||
235 | if (up) { | ||
236 | if (!(chip->open & SB_OPEN_MIDI_OUTPUT_TRIGGER)) { | ||
237 | init_timer(&chip->midi_timer); | ||
238 | chip->midi_timer.function = snd_sb8dsp_midi_output_timer; | ||
239 | chip->midi_timer.data = (unsigned long) substream; | ||
240 | chip->midi_timer.expires = 1 + jiffies; | ||
241 | add_timer(&chip->midi_timer); | ||
242 | chip->open |= SB_OPEN_MIDI_OUTPUT_TRIGGER; | ||
243 | } | ||
244 | } else { | ||
245 | if (chip->open & SB_OPEN_MIDI_OUTPUT_TRIGGER) { | ||
246 | chip->open &= ~SB_OPEN_MIDI_OUTPUT_TRIGGER; | ||
247 | } | ||
248 | } | ||
249 | spin_unlock_irqrestore(&chip->open_lock, flags); | ||
250 | |||
251 | if (up) | ||
252 | snd_sb8dsp_midi_output_write(substream); | ||
253 | } | ||
254 | |||
255 | /* | ||
256 | |||
257 | */ | ||
258 | |||
259 | static snd_rawmidi_ops_t snd_sb8dsp_midi_output = | ||
260 | { | ||
261 | .open = snd_sb8dsp_midi_output_open, | ||
262 | .close = snd_sb8dsp_midi_output_close, | ||
263 | .trigger = snd_sb8dsp_midi_output_trigger, | ||
264 | }; | ||
265 | |||
266 | static snd_rawmidi_ops_t snd_sb8dsp_midi_input = | ||
267 | { | ||
268 | .open = snd_sb8dsp_midi_input_open, | ||
269 | .close = snd_sb8dsp_midi_input_close, | ||
270 | .trigger = snd_sb8dsp_midi_input_trigger, | ||
271 | }; | ||
272 | |||
273 | int snd_sb8dsp_midi(sb_t *chip, int device, snd_rawmidi_t ** rrawmidi) | ||
274 | { | ||
275 | snd_rawmidi_t *rmidi; | ||
276 | int err; | ||
277 | |||
278 | if (rrawmidi) | ||
279 | *rrawmidi = NULL; | ||
280 | if ((err = snd_rawmidi_new(chip->card, "SB8 MIDI", device, 1, 1, &rmidi)) < 0) | ||
281 | return err; | ||
282 | strcpy(rmidi->name, "SB8 MIDI"); | ||
283 | snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_OUTPUT, &snd_sb8dsp_midi_output); | ||
284 | snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_INPUT, &snd_sb8dsp_midi_input); | ||
285 | rmidi->info_flags |= SNDRV_RAWMIDI_INFO_OUTPUT | SNDRV_RAWMIDI_INFO_INPUT; | ||
286 | if (chip->hardware >= SB_HW_20) | ||
287 | rmidi->info_flags |= SNDRV_RAWMIDI_INFO_DUPLEX; | ||
288 | rmidi->private_data = chip; | ||
289 | chip->rmidi = rmidi; | ||
290 | if (rrawmidi) | ||
291 | *rrawmidi = rmidi; | ||
292 | return 0; | ||
293 | } | ||