[linux.git] / sound / usb / 6fire / midi.c

/*
 * Linux driver for TerraTec DMX 6Fire USB
 *
 * Rawmidi driver
 *
 * Author:	Torsten Schenk <[email protected]>
 * Created:	Jan 01, 2011
 * Copyright:	(C) Torsten Schenk
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 */

#include <sound/rawmidi.h>

#include "midi.h"
#include "chip.h"
#include "comm.h"

enum {
	MIDI_BUFSIZE = 64
};

static void usb6fire_midi_out_handler(struct urb *urb)
{
	struct midi_runtime *rt = urb->context;
	int ret;
	unsigned long flags;

	spin_lock_irqsave(&rt->out_lock, flags);

	if (rt->out) {
		ret = snd_rawmidi_transmit(rt->out, rt->out_buffer + 4,
				MIDI_BUFSIZE - 4);
		if (ret > 0) { /* more data available, send next packet */
			rt->out_buffer[1] = ret + 2;
			rt->out_buffer[3] = rt->out_serial++;
			urb->transfer_buffer_length = ret + 4;

			ret = usb_submit_urb(urb, GFP_ATOMIC);
			if (ret < 0)
				dev_err(&urb->dev->dev,
					"midi out urb submit failed: %d\n",
					ret);
		} else /* no more data to transmit */
			rt->out = NULL;
	}
	spin_unlock_irqrestore(&rt->out_lock, flags);
}

static void usb6fire_midi_in_received(
		struct midi_runtime *rt, u8 *data, int length)
{
	unsigned long flags;

	spin_lock_irqsave(&rt->in_lock, flags);
	if (rt->in)
		snd_rawmidi_receive(rt->in, data, length);
	spin_unlock_irqrestore(&rt->in_lock, flags);
}

static int usb6fire_midi_out_open(struct snd_rawmidi_substream *alsa_sub)
{
	return 0;
}

static int usb6fire_midi_out_close(struct snd_rawmidi_substream *alsa_sub)
{
	return 0;
}

static void usb6fire_midi_out_trigger(
		struct snd_rawmidi_substream *alsa_sub, int up)
{
	struct midi_runtime *rt = alsa_sub->rmidi->private_data;
	struct urb *urb = &rt->out_urb;
	__s8 ret;
	unsigned long flags;

	spin_lock_irqsave(&rt->out_lock, flags);
	if (up) { /* start transfer */
		if (rt->out) { /* we are already transmitting so just return */
			spin_unlock_irqrestore(&rt->out_lock, flags);
			return;
		}

		ret = snd_rawmidi_transmit(alsa_sub, rt->out_buffer + 4,
				MIDI_BUFSIZE - 4);
		if (ret > 0) {
			rt->out_buffer[1] = ret + 2;
			rt->out_buffer[3] = rt->out_serial++;
			urb->transfer_buffer_length = ret + 4;

			ret = usb_submit_urb(urb, GFP_ATOMIC);
			if (ret < 0)
				dev_err(&urb->dev->dev,
					"midi out urb submit failed: %d\n",
					ret);
			else
				rt->out = alsa_sub;
		}
	} else if (rt->out == alsa_sub)
		rt->out = NULL;
	spin_unlock_irqrestore(&rt->out_lock, flags);
}

static void usb6fire_midi_out_drain(struct snd_rawmidi_substream *alsa_sub)
{
	struct midi_runtime *rt = alsa_sub->rmidi->private_data;
	int retry = 0;

	while (rt->out && retry++ < 100)
		msleep(10);
}

static int usb6fire_midi_in_open(struct snd_rawmidi_substream *alsa_sub)
{
	return 0;
}

static int usb6fire_midi_in_close(struct snd_rawmidi_substream *alsa_sub)
{
	return 0;
}

static void usb6fire_midi_in_trigger(
		struct snd_rawmidi_substream *alsa_sub, int up)
{
	struct midi_runtime *rt = alsa_sub->rmidi->private_data;
	unsigned long flags;

	spin_lock_irqsave(&rt->in_lock, flags);
	if (up)
		rt->in = alsa_sub;
	else
		rt->in = NULL;
	spin_unlock_irqrestore(&rt->in_lock, flags);
}

static const struct snd_rawmidi_ops out_ops = {
	.open = usb6fire_midi_out_open,
	.close = usb6fire_midi_out_close,
	.trigger = usb6fire_midi_out_trigger,
	.drain = usb6fire_midi_out_drain
};

static const struct snd_rawmidi_ops in_ops = {
	.open = usb6fire_midi_in_open,
	.close = usb6fire_midi_in_close,
	.trigger = usb6fire_midi_in_trigger
};

int usb6fire_midi_init(struct sfire_chip *chip)
{
	int ret;
	struct midi_runtime *rt = kzalloc(sizeof(struct midi_runtime),
			GFP_KERNEL);
	struct comm_runtime *comm_rt = chip->comm;

	if (!rt)
		return -ENOMEM;

	rt->out_buffer = kzalloc(MIDI_BUFSIZE, GFP_KERNEL);
	if (!rt->out_buffer) {
		kfree(rt);
		return -ENOMEM;
	}

	rt->chip = chip;
	rt->in_received = usb6fire_midi_in_received;
	rt->out_buffer[0] = 0x80; /* 'send midi' command */
	rt->out_buffer[1] = 0x00; /* size of data */
	rt->out_buffer[2] = 0x00; /* always 0 */
	spin_lock_init(&rt->in_lock);
	spin_lock_init(&rt->out_lock);

	comm_rt->init_urb(comm_rt, &rt->out_urb, rt->out_buffer, rt,
			usb6fire_midi_out_handler);

	ret = snd_rawmidi_new(chip->card, "6FireUSB", 0, 1, 1, &rt->instance);
	if (ret < 0) {
		kfree(rt->out_buffer);
		kfree(rt);
		dev_err(&chip->dev->dev, "unable to create midi.\n");
		return ret;
	}
	rt->instance->private_data = rt;
	strcpy(rt->instance->name, "DMX6FireUSB MIDI");
	rt->instance->info_flags = SNDRV_RAWMIDI_INFO_OUTPUT |
			SNDRV_RAWMIDI_INFO_INPUT |
			SNDRV_RAWMIDI_INFO_DUPLEX;
	snd_rawmidi_set_ops(rt->instance, SNDRV_RAWMIDI_STREAM_OUTPUT,
			&out_ops);
	snd_rawmidi_set_ops(rt->instance, SNDRV_RAWMIDI_STREAM_INPUT,
			&in_ops);

	chip->midi = rt;
	return 0;
}

void usb6fire_midi_abort(struct sfire_chip *chip)
{
	struct midi_runtime *rt = chip->midi;

	if (rt)
		usb_poison_urb(&rt->out_urb);
}

void usb6fire_midi_destroy(struct sfire_chip *chip)
{
	struct midi_runtime *rt = chip->midi;

	kfree(rt->out_buffer);
	kfree(rt);
	chip->midi = NULL;
}
Commit	Line	Data
c6d43ba8 TS	1	/*
	2	* Linux driver for TerraTec DMX 6Fire USB
	3	*
	4	* Rawmidi driver
	5	*
	6	* Author: Torsten Schenk <[email protected]>
	7	* Created: Jan 01, 2011
c6d43ba8 TS	8	* Copyright: (C) Torsten Schenk
	9	*
	10	* This program is free software; you can redistribute it and/or modify
	11	* it under the terms of the GNU General Public License as published by
	12	* the Free Software Foundation; either version 2 of the License, or
	13	* (at your option) any later version.
	14	*/
	15
	16	#include <sound/rawmidi.h>
	17
	18	#include "midi.h"
	19	#include "chip.h"
	20	#include "comm.h"
	21
4c2aee00 TS	22	enum {
	23	MIDI_BUFSIZE = 64
	24	};
	25
c6d43ba8 TS	26	static void usb6fire_midi_out_handler(struct urb *urb)
	27	{
	28	struct midi_runtime *rt = urb->context;
	29	int ret;
	30	unsigned long flags;
	31
	32	spin_lock_irqsave(&rt->out_lock, flags);
	33
	34	if (rt->out) {
	35	ret = snd_rawmidi_transmit(rt->out, rt->out_buffer + 4,
	36	MIDI_BUFSIZE - 4);
	37	if (ret > 0) { /* more data available, send next packet */
	38	rt->out_buffer[1] = ret + 2;
	39	rt->out_buffer[3] = rt->out_serial++;
	40	urb->transfer_buffer_length = ret + 4;
	41
	42	ret = usb_submit_urb(urb, GFP_ATOMIC);
	43	if (ret < 0)
e3b3757b TI	44	dev_err(&urb->dev->dev,
	45	"midi out urb submit failed: %d\n",
	46	ret);
c6d43ba8 TS	47	} else /* no more data to transmit */
	48	rt->out = NULL;
	49	}
	50	spin_unlock_irqrestore(&rt->out_lock, flags);
	51	}
	52
	53	static void usb6fire_midi_in_received(
	54	struct midi_runtime rt, u8 data, int length)
	55	{
	56	unsigned long flags;
	57
	58	spin_lock_irqsave(&rt->in_lock, flags);
	59	if (rt->in)
	60	snd_rawmidi_receive(rt->in, data, length);
	61	spin_unlock_irqrestore(&rt->in_lock, flags);
	62	}
	63
	64	static int usb6fire_midi_out_open(struct snd_rawmidi_substream *alsa_sub)
	65	{
	66	return 0;
	67	}
	68
	69	static int usb6fire_midi_out_close(struct snd_rawmidi_substream *alsa_sub)
	70	{
	71	return 0;
	72	}
	73
	74	static void usb6fire_midi_out_trigger(
	75	struct snd_rawmidi_substream *alsa_sub, int up)
	76	{
	77	struct midi_runtime *rt = alsa_sub->rmidi->private_data;
	78	struct urb *urb = &rt->out_urb;
	79	__s8 ret;
	80	unsigned long flags;
	81
	82	spin_lock_irqsave(&rt->out_lock, flags);
	83	if (up) { /* start transfer */
	84	if (rt->out) { /* we are already transmitting so just return */
	85	spin_unlock_irqrestore(&rt->out_lock, flags);
	86	return;
	87	}
	88
	89	ret = snd_rawmidi_transmit(alsa_sub, rt->out_buffer + 4,
	90	MIDI_BUFSIZE - 4);
	91	if (ret > 0) {
	92	rt->out_buffer[1] = ret + 2;
	93	rt->out_buffer[3] = rt->out_serial++;
	94	urb->transfer_buffer_length = ret + 4;
	95
	96	ret = usb_submit_urb(urb, GFP_ATOMIC);
	97	if (ret < 0)
e3b3757b TI	98	dev_err(&urb->dev->dev,
	99	"midi out urb submit failed: %d\n",
	100	ret);
c6d43ba8 TS	101	else
	102	rt->out = alsa_sub;
	103	}
	104	} else if (rt->out == alsa_sub)
	105	rt->out = NULL;
	106	spin_unlock_irqrestore(&rt->out_lock, flags);
	107	}
	108
	109	static void usb6fire_midi_out_drain(struct snd_rawmidi_substream *alsa_sub)
	110	{
	111	struct midi_runtime *rt = alsa_sub->rmidi->private_data;
	112	int retry = 0;
	113
	114	while (rt->out && retry++ < 100)
	115	msleep(10);
	116	}
	117
	118	static int usb6fire_midi_in_open(struct snd_rawmidi_substream *alsa_sub)
	119	{
	120	return 0;
	121	}
	122
	123	static int usb6fire_midi_in_close(struct snd_rawmidi_substream *alsa_sub)
	124	{
	125	return 0;
	126	}
	127
	128	static void usb6fire_midi_in_trigger(
	129	struct snd_rawmidi_substream *alsa_sub, int up)
	130	{
	131	struct midi_runtime *rt = alsa_sub->rmidi->private_data;
	132	unsigned long flags;
	133
	134	spin_lock_irqsave(&rt->in_lock, flags);
	135	if (up)
	136	rt->in = alsa_sub;
	137	else
	138	rt->in = NULL;
	139	spin_unlock_irqrestore(&rt->in_lock, flags);
	140	}
	141
f43e5407	142	static const struct snd_rawmidi_ops out_ops = {
c6d43ba8 TS	143	.open = usb6fire_midi_out_open,
	144	.close = usb6fire_midi_out_close,
	145	.trigger = usb6fire_midi_out_trigger,
	146	.drain = usb6fire_midi_out_drain
	147	};
	148
f43e5407	149	static const struct snd_rawmidi_ops in_ops = {
c6d43ba8 TS	150	.open = usb6fire_midi_in_open,
	151	.close = usb6fire_midi_in_close,
	152	.trigger = usb6fire_midi_in_trigger
	153	};
	154
87f9796a	155	int usb6fire_midi_init(struct sfire_chip *chip)
c6d43ba8 TS	156	{
	157	int ret;
	158	struct midi_runtime *rt = kzalloc(sizeof(struct midi_runtime),
	159	GFP_KERNEL);
	160	struct comm_runtime *comm_rt = chip->comm;
	161
	162	if (!rt)
	163	return -ENOMEM;
	164
4c2aee00 TS	165	rt->out_buffer = kzalloc(MIDI_BUFSIZE, GFP_KERNEL);
	166	if (!rt->out_buffer) {
	167	kfree(rt);
	168	return -ENOMEM;
	169	}
	170
c6d43ba8 TS	171	rt->chip = chip;
	172	rt->in_received = usb6fire_midi_in_received;
	173	rt->out_buffer[0] = 0x80; /* 'send midi' command */
	174	rt->out_buffer[1] = 0x00; /* size of data */
	175	rt->out_buffer[2] = 0x00; /* always 0 */
	176	spin_lock_init(&rt->in_lock);
	177	spin_lock_init(&rt->out_lock);
	178
	179	comm_rt->init_urb(comm_rt, &rt->out_urb, rt->out_buffer, rt,
	180	usb6fire_midi_out_handler);
	181
	182	ret = snd_rawmidi_new(chip->card, "6FireUSB", 0, 1, 1, &rt->instance);
	183	if (ret < 0) {
4c2aee00	184	kfree(rt->out_buffer);
c6d43ba8	185	kfree(rt);
e3b3757b	186	dev_err(&chip->dev->dev, "unable to create midi.\n");
c6d43ba8 TS	187	return ret;
	188	}
	189	rt->instance->private_data = rt;
	190	strcpy(rt->instance->name, "DMX6FireUSB MIDI");
	191	rt->instance->info_flags = SNDRV_RAWMIDI_INFO_OUTPUT \|
	192	SNDRV_RAWMIDI_INFO_INPUT \|
	193	SNDRV_RAWMIDI_INFO_DUPLEX;
	194	snd_rawmidi_set_ops(rt->instance, SNDRV_RAWMIDI_STREAM_OUTPUT,
	195	&out_ops);
	196	snd_rawmidi_set_ops(rt->instance, SNDRV_RAWMIDI_STREAM_INPUT,
	197	&in_ops);
	198
	199	chip->midi = rt;
	200	return 0;
	201	}
	202
	203	void usb6fire_midi_abort(struct sfire_chip *chip)
	204	{
	205	struct midi_runtime *rt = chip->midi;
	206
	207	if (rt)
	208	usb_poison_urb(&rt->out_urb);
	209	}
	210
	211	void usb6fire_midi_destroy(struct sfire_chip *chip)
	212	{
4c2aee00 TS	213	struct midi_runtime *rt = chip->midi;
	214
	215	kfree(rt->out_buffer);
	216	kfree(rt);
c6d43ba8 TS	217	chip->midi = NULL;
c6d43ba8 TS	218	}