2 * Line 6 Linux USB driver
4 * Copyright (C) 2004-2010 Markus Grabner (grabner@icg.tugraz.at)
6 * This program is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU General Public License as
8 * published by the Free Software Foundation, version 2.
12 #include <linux/slab.h>
17 static int midibuf_message_length(unsigned char code)
23 else if (code < 0xf0) {
24 static const int length[] = { 3, 3, 3, 3, 2, 2, 3 };
26 message_length = length[(code >> 4) - 8];
28 static const int length[] = { -1, 2, 2, 2, -1, -1, 1, 1, 1, -1,
31 message_length = length[code & 0x0f];
34 return message_length;
37 static int midibuf_is_empty(struct midi_buffer *this)
39 return (this->pos_read == this->pos_write) && !this->full;
42 static int midibuf_is_full(struct midi_buffer *this)
47 void line6_midibuf_reset(struct midi_buffer *this)
49 this->pos_read = this->pos_write = this->full = 0;
50 this->command_prev = -1;
53 int line6_midibuf_init(struct midi_buffer *this, int size, int split)
55 this->buf = kmalloc(size, GFP_KERNEL);
57 if (this->buf == NULL)
62 line6_midibuf_reset(this);
66 int line6_midibuf_bytes_free(struct midi_buffer *this)
69 midibuf_is_full(this) ?
71 (this->pos_read - this->pos_write + this->size - 1) % this->size +
75 int line6_midibuf_bytes_used(struct midi_buffer *this)
78 midibuf_is_empty(this) ?
80 (this->pos_write - this->pos_read + this->size - 1) % this->size +
84 int line6_midibuf_write(struct midi_buffer *this, unsigned char *data,
89 int skip_active_sense = 0;
91 if (midibuf_is_full(this) || (length <= 0))
94 /* skip trailing active sense */
95 if (data[length - 1] == 0xfe) {
97 skip_active_sense = 1;
100 bytes_free = line6_midibuf_bytes_free(this);
102 if (length > bytes_free)
106 length1 = this->size - this->pos_write;
108 if (length < length1) {
109 /* no buffer wraparound */
110 memcpy(this->buf + this->pos_write, data, length);
111 this->pos_write += length;
113 /* buffer wraparound */
114 length2 = length - length1;
115 memcpy(this->buf + this->pos_write, data, length1);
116 memcpy(this->buf, data + length1, length2);
117 this->pos_write = length2;
120 if (this->pos_write == this->pos_read)
124 return length + skip_active_sense;
127 int line6_midibuf_read(struct midi_buffer *this, unsigned char *data,
128 int length, int read_type)
131 int length1, length2;
137 /* we need to be able to store at least a 3 byte MIDI message */
141 if (midibuf_is_empty(this))
144 bytes_used = line6_midibuf_bytes_used(this);
146 if (length > bytes_used)
149 length1 = this->size - this->pos_read;
151 command = this->buf[this->pos_read];
153 PODxt always has status byte lower nibble set to 0010,
154 when it means to send 0000, so we correct if here so
155 that control/program changes come on channel 1 and
156 sysex message status byte is correct
158 if (read_type == LINE6_MIDIBUF_READ_RX) {
159 if (command == 0xb2 || command == 0xc2 || command == 0xf2) {
160 unsigned char fixed = command & 0xf0;
161 this->buf[this->pos_read] = fixed;
166 /* check MIDI command length */
167 if (command & 0x80) {
168 midi_length = midibuf_message_length(command);
169 this->command_prev = command;
171 if (this->command_prev > 0) {
172 int midi_length_prev =
173 midibuf_message_length(this->command_prev);
175 if (midi_length_prev > 1) {
176 midi_length = midi_length_prev - 1;
184 if (midi_length < 0) {
185 /* search for end of message */
186 if (length < length1) {
187 /* no buffer wraparound */
188 for (i = 1; i < length; ++i)
189 if (this->buf[this->pos_read + i] & 0x80)
194 /* buffer wraparound */
195 length2 = length - length1;
197 for (i = 1; i < length1; ++i)
198 if (this->buf[this->pos_read + i] & 0x80)
204 for (i = 0; i < length2; ++i)
205 if (this->buf[i] & 0x80)
208 midi_length = length1 + i;
212 if (midi_length == length)
213 midi_length = -1; /* end of message not found */
216 if (midi_length < 0) {
218 return 0; /* command is not yet complete */
220 if (length < midi_length)
221 return 0; /* command is not yet complete */
223 length = midi_length;
226 if (length < length1) {
227 /* no buffer wraparound */
228 memcpy(data + repeat, this->buf + this->pos_read, length);
229 this->pos_read += length;
231 /* buffer wraparound */
232 length2 = length - length1;
233 memcpy(data + repeat, this->buf + this->pos_read, length1);
234 memcpy(data + repeat + length1, this->buf, length2);
235 this->pos_read = length2;
239 data[0] = this->command_prev;
242 return length + repeat;
245 int line6_midibuf_ignore(struct midi_buffer *this, int length)
247 int bytes_used = line6_midibuf_bytes_used(this);
249 if (length > bytes_used)
252 this->pos_read = (this->pos_read + length) % this->size;
257 void line6_midibuf_destroy(struct midi_buffer *this)