]> git.proxmox.com Git - mirror_ubuntu-artful-kernel.git/blame - sound/pci/echoaudio/midi.c
ALSA: echoaudio: remove all snd_printk
[mirror_ubuntu-artful-kernel.git] / sound / pci / echoaudio / midi.c
CommitLineData
dd7b254d
GP
1/****************************************************************************
2
3 Copyright Echo Digital Audio Corporation (c) 1998 - 2004
4 All rights reserved
5 www.echoaudio.com
6
7 This file is part of Echo Digital Audio's generic driver library.
8
9 Echo Digital Audio's generic driver library is free software;
10 you can redistribute it and/or modify it under the terms of
11 the GNU General Public License as published by the Free Software
12 Foundation.
13
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
18
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the Free Software
21 Foundation, Inc., 59 Temple Place - Suite 330, Boston,
22 MA 02111-1307, USA.
23
24 *************************************************************************
25
26 Translation from C++ and adaptation for use in ALSA-Driver
27 were made by Giuliano Pochini <pochini@shiny.it>
28
29****************************************************************************/
30
31
32/******************************************************************************
33 MIDI lowlevel code
34******************************************************************************/
35
36/* Start and stop Midi input */
37static int enable_midi_input(struct echoaudio *chip, char enable)
38{
b5b4a41b 39 dev_dbg(chip->card->dev, "enable_midi_input(%d)\n", enable);
dd7b254d
GP
40
41 if (wait_handshake(chip))
42 return -EIO;
43
44 if (enable) {
45 chip->mtc_state = MIDI_IN_STATE_NORMAL;
46 chip->comm_page->flags |=
e930e995 47 cpu_to_le32(DSP_FLAG_MIDI_INPUT);
dd7b254d
GP
48 } else
49 chip->comm_page->flags &=
e930e995 50 ~cpu_to_le32(DSP_FLAG_MIDI_INPUT);
dd7b254d
GP
51
52 clear_handshake(chip);
53 return send_vector(chip, DSP_VC_UPDATE_FLAGS);
54}
55
56
57
58/* Send a buffer full of MIDI data to the DSP
59Returns how many actually written or < 0 on error */
60static int write_midi(struct echoaudio *chip, u8 *data, int bytes)
61{
da3cec35
TI
62 if (snd_BUG_ON(bytes <= 0 || bytes >= MIDI_OUT_BUFFER_SIZE))
63 return -EINVAL;
dd7b254d
GP
64
65 if (wait_handshake(chip))
66 return -EIO;
67
68 /* HF4 indicates that it is safe to write MIDI output data */
69 if (! (get_dsp_register(chip, CHI32_STATUS_REG) & CHI32_STATUS_REG_HF4))
70 return 0;
71
72 chip->comm_page->midi_output[0] = bytes;
73 memcpy(&chip->comm_page->midi_output[1], data, bytes);
74 chip->comm_page->midi_out_free_count = 0;
75 clear_handshake(chip);
76 send_vector(chip, DSP_VC_MIDI_WRITE);
b5b4a41b 77 dev_dbg(chip->card->dev, "write_midi: %d\n", bytes);
dd7b254d
GP
78 return bytes;
79}
80
81
82
83/* Run the state machine for MIDI input data
84MIDI time code sync isn't supported by this code right now, but you still need
85this state machine to parse the incoming MIDI data stream. Every time the DSP
86sees a 0xF1 byte come in, it adds the DSP sample position to the MIDI data
87stream. The DSP sample position is represented as a 32 bit unsigned value,
88with the high 16 bits first, followed by the low 16 bits. Since these aren't
89real MIDI bytes, the following logic is needed to skip them. */
90static inline int mtc_process_data(struct echoaudio *chip, short midi_byte)
91{
92 switch (chip->mtc_state) {
93 case MIDI_IN_STATE_NORMAL:
94 if (midi_byte == 0xF1)
95 chip->mtc_state = MIDI_IN_STATE_TS_HIGH;
96 break;
97 case MIDI_IN_STATE_TS_HIGH:
98 chip->mtc_state = MIDI_IN_STATE_TS_LOW;
99 return MIDI_IN_SKIP_DATA;
100 break;
101 case MIDI_IN_STATE_TS_LOW:
102 chip->mtc_state = MIDI_IN_STATE_F1_DATA;
103 return MIDI_IN_SKIP_DATA;
104 break;
105 case MIDI_IN_STATE_F1_DATA:
106 chip->mtc_state = MIDI_IN_STATE_NORMAL;
107 break;
108 }
109 return 0;
110}
111
112
113
114/* This function is called from the IRQ handler and it reads the midi data
115from the DSP's buffer. It returns the number of bytes received. */
116static int midi_service_irq(struct echoaudio *chip)
117{
118 short int count, midi_byte, i, received;
119
120 /* The count is at index 0, followed by actual data */
121 count = le16_to_cpu(chip->comm_page->midi_input[0]);
122
da3cec35
TI
123 if (snd_BUG_ON(count >= MIDI_IN_BUFFER_SIZE))
124 return 0;
dd7b254d
GP
125
126 /* Get the MIDI data from the comm page */
127 i = 1;
128 received = 0;
129 for (i = 1; i <= count; i++) {
130 /* Get the MIDI byte */
131 midi_byte = le16_to_cpu(chip->comm_page->midi_input[i]);
132
133 /* Parse the incoming MIDI stream. The incoming MIDI data
134 consists of MIDI bytes and timestamps for the MIDI time code
135 0xF1 bytes. mtc_process_data() is a little state machine that
136 parses the stream. If you get MIDI_IN_SKIP_DATA back, then
137 this is a timestamp byte, not a MIDI byte, so don't store it
138 in the MIDI input buffer. */
139 if (mtc_process_data(chip, midi_byte) == MIDI_IN_SKIP_DATA)
140 continue;
141
142 chip->midi_buffer[received++] = (u8)midi_byte;
143 }
144
145 return received;
146}
147
148
149
150
151/******************************************************************************
152 MIDI interface
153******************************************************************************/
154
155static int snd_echo_midi_input_open(struct snd_rawmidi_substream *substream)
156{
157 struct echoaudio *chip = substream->rmidi->private_data;
158
159 chip->midi_in = substream;
b5b4a41b 160 dev_dbg(chip->card->dev, "rawmidi_iopen\n");
dd7b254d
GP
161 return 0;
162}
163
164
165
166static void snd_echo_midi_input_trigger(struct snd_rawmidi_substream *substream,
167 int up)
168{
169 struct echoaudio *chip = substream->rmidi->private_data;
170
171 if (up != chip->midi_input_enabled) {
172 spin_lock_irq(&chip->lock);
173 enable_midi_input(chip, up);
174 spin_unlock_irq(&chip->lock);
175 chip->midi_input_enabled = up;
176 }
177}
178
179
180
181static int snd_echo_midi_input_close(struct snd_rawmidi_substream *substream)
182{
183 struct echoaudio *chip = substream->rmidi->private_data;
184
185 chip->midi_in = NULL;
b5b4a41b 186 dev_dbg(chip->card->dev, "rawmidi_iclose\n");
dd7b254d
GP
187 return 0;
188}
189
190
191
192static int snd_echo_midi_output_open(struct snd_rawmidi_substream *substream)
193{
194 struct echoaudio *chip = substream->rmidi->private_data;
195
196 chip->tinuse = 0;
197 chip->midi_full = 0;
198 chip->midi_out = substream;
b5b4a41b 199 dev_dbg(chip->card->dev, "rawmidi_open\n");
dd7b254d
GP
200 return 0;
201}
202
203
204
205static void snd_echo_midi_output_write(unsigned long data)
206{
207 struct echoaudio *chip = (struct echoaudio *)data;
208 unsigned long flags;
209 int bytes, sent, time;
210 unsigned char buf[MIDI_OUT_BUFFER_SIZE - 1];
211
b5b4a41b 212 dev_dbg(chip->card->dev, "snd_echo_midi_output_write\n");
dd7b254d
GP
213 /* No interrupts are involved: we have to check at regular intervals
214 if the card's output buffer has room for new data. */
215 sent = bytes = 0;
216 spin_lock_irqsave(&chip->lock, flags);
217 chip->midi_full = 0;
5929546a 218 if (!snd_rawmidi_transmit_empty(chip->midi_out)) {
dd7b254d
GP
219 bytes = snd_rawmidi_transmit_peek(chip->midi_out, buf,
220 MIDI_OUT_BUFFER_SIZE - 1);
b5b4a41b 221 dev_dbg(chip->card->dev, "Try to send %d bytes...\n", bytes);
dd7b254d
GP
222 sent = write_midi(chip, buf, bytes);
223 if (sent < 0) {
ece7a36d
TI
224 dev_err(chip->card->dev,
225 "write_midi() error %d\n", sent);
dd7b254d
GP
226 /* retry later */
227 sent = 9000;
228 chip->midi_full = 1;
229 } else if (sent > 0) {
b5b4a41b 230 dev_dbg(chip->card->dev, "%d bytes sent\n", sent);
dd7b254d
GP
231 snd_rawmidi_transmit_ack(chip->midi_out, sent);
232 } else {
233 /* Buffer is full. DSP's internal buffer is 64 (128 ?)
234 bytes long. Let's wait until half of them are sent */
b5b4a41b 235 dev_dbg(chip->card->dev, "Full\n");
dd7b254d
GP
236 sent = 32;
237 chip->midi_full = 1;
238 }
239 }
240
241 /* We restart the timer only if there is some data left to send */
242 if (!snd_rawmidi_transmit_empty(chip->midi_out) && chip->tinuse) {
243 /* The timer will expire slightly after the data has been
244 sent */
245 time = (sent << 3) / 25 + 1; /* 8/25=0.32ms to send a byte */
246 mod_timer(&chip->timer, jiffies + (time * HZ + 999) / 1000);
b5b4a41b
SM
247 dev_dbg(chip->card->dev,
248 "Timer armed(%d)\n", ((time * HZ + 999) / 1000));
dd7b254d
GP
249 }
250 spin_unlock_irqrestore(&chip->lock, flags);
251}
252
253
254
255static void snd_echo_midi_output_trigger(struct snd_rawmidi_substream *substream,
256 int up)
257{
258 struct echoaudio *chip = substream->rmidi->private_data;
259
b5b4a41b 260 dev_dbg(chip->card->dev, "snd_echo_midi_output_trigger(%d)\n", up);
dd7b254d
GP
261 spin_lock_irq(&chip->lock);
262 if (up) {
263 if (!chip->tinuse) {
264 init_timer(&chip->timer);
265 chip->timer.function = snd_echo_midi_output_write;
266 chip->timer.data = (unsigned long)chip;
267 chip->tinuse = 1;
268 }
269 } else {
270 if (chip->tinuse) {
dd7b254d 271 chip->tinuse = 0;
5929546a
GP
272 spin_unlock_irq(&chip->lock);
273 del_timer_sync(&chip->timer);
b5b4a41b 274 dev_dbg(chip->card->dev, "Timer removed\n");
5929546a 275 return;
dd7b254d
GP
276 }
277 }
278 spin_unlock_irq(&chip->lock);
279
280 if (up && !chip->midi_full)
281 snd_echo_midi_output_write((unsigned long)chip);
282}
283
284
285
286static int snd_echo_midi_output_close(struct snd_rawmidi_substream *substream)
287{
288 struct echoaudio *chip = substream->rmidi->private_data;
289
290 chip->midi_out = NULL;
b5b4a41b 291 dev_dbg(chip->card->dev, "rawmidi_oclose\n");
dd7b254d
GP
292 return 0;
293}
294
295
296
297static struct snd_rawmidi_ops snd_echo_midi_input = {
298 .open = snd_echo_midi_input_open,
299 .close = snd_echo_midi_input_close,
300 .trigger = snd_echo_midi_input_trigger,
301};
302
303static struct snd_rawmidi_ops snd_echo_midi_output = {
304 .open = snd_echo_midi_output_open,
305 .close = snd_echo_midi_output_close,
306 .trigger = snd_echo_midi_output_trigger,
307};
308
309
310
311/* <--snd_echo_probe() */
e23e7a14
BP
312static int snd_echo_midi_create(struct snd_card *card,
313 struct echoaudio *chip)
dd7b254d
GP
314{
315 int err;
316
317 if ((err = snd_rawmidi_new(card, card->shortname, 0, 1, 1,
318 &chip->rmidi)) < 0)
319 return err;
320
321 strcpy(chip->rmidi->name, card->shortname);
322 chip->rmidi->private_data = chip;
323
324 snd_rawmidi_set_ops(chip->rmidi, SNDRV_RAWMIDI_STREAM_INPUT,
325 &snd_echo_midi_input);
326 snd_rawmidi_set_ops(chip->rmidi, SNDRV_RAWMIDI_STREAM_OUTPUT,
327 &snd_echo_midi_output);
328
329 chip->rmidi->info_flags |= SNDRV_RAWMIDI_INFO_OUTPUT |
330 SNDRV_RAWMIDI_INFO_INPUT | SNDRV_RAWMIDI_INFO_DUPLEX;
b5b4a41b 331 dev_dbg(chip->card->dev, "MIDI ok\n");
dd7b254d
GP
332 return 0;
333}