[deliverable/linux.git] / drivers / staging / line6 / playback.c

/*
 * Line6 Linux USB driver - 0.9.1beta
 *
 * Copyright (C) 2004-2010 Markus Grabner (grabner@icg.tugraz.at)
 *
 *	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, version 2.
 *
 */

#include <linux/slab.h>
#include <sound/core.h>
#include <sound/pcm.h>
#include <sound/pcm_params.h>

#include "audio.h"
#include "capture.h"
#include "driver.h"
#include "pcm.h"
#include "pod.h"
#include "playback.h"

/*
	Software stereo volume control.
*/
static void change_volume(struct urb *urb_out, int volume[],
			  int bytes_per_frame)
{
	int chn = 0;

	if (volume[0] == 256 && volume[1] == 256)
		return;		/* maximum volume - no change */

	if (bytes_per_frame == 4) {
		short *p, *buf_end;
		p = (short *)urb_out->transfer_buffer;
		buf_end = p + urb_out->transfer_buffer_length / sizeof(*p);

		for (; p < buf_end; ++p) {
			*p = (*p * volume[chn & 1]) >> 8;
			++chn;
		}
	} else if (bytes_per_frame == 6) {
		unsigned char *p, *buf_end;
		p = (unsigned char *)urb_out->transfer_buffer;
		buf_end = p + urb_out->transfer_buffer_length;

		for (; p < buf_end; p += 3) {
			int val;
			val = p[0] + (p[1] << 8) + ((signed char)p[2] << 16);
			val = (val * volume[chn & 1]) >> 8;
			p[0] = val;
			p[1] = val >> 8;
			p[2] = val >> 16;
			++chn;
		}
	}
}

#ifdef CONFIG_LINE6_USB_IMPULSE_RESPONSE

/*
	Create signal for impulse response test.
*/
static void create_impulse_test_signal(struct snd_line6_pcm *line6pcm,
				       struct urb *urb_out, int bytes_per_frame)
{
	int frames = urb_out->transfer_buffer_length / bytes_per_frame;

	if (bytes_per_frame == 4) {
		int i;
		short *pi = (short *)line6pcm->prev_fbuf;
		short *po = (short *)urb_out->transfer_buffer;

		for (i = 0; i < frames; ++i) {
			po[0] = pi[0];
			po[1] = 0;
			pi += 2;
			po += 2;
		}
	} else if (bytes_per_frame == 6) {
		int i, j;
		unsigned char *pi = line6pcm->prev_fbuf;
		unsigned char *po = urb_out->transfer_buffer;

		for (i = 0; i < frames; ++i) {
			for (j = 0; j < bytes_per_frame / 2; ++j)
				po[j] = pi[j];

			for (; j < bytes_per_frame; ++j)
				po[j] = 0;

			pi += bytes_per_frame;
			po += bytes_per_frame;
		}
	}
	if (--line6pcm->impulse_count <= 0) {
		((unsigned char *)(urb_out->transfer_buffer))[bytes_per_frame -
							      1] =
		    line6pcm->impulse_volume;
		line6pcm->impulse_count = line6pcm->impulse_period;
	}
}

#endif

/*
	Add signal to buffer for software monitoring.
*/
static void add_monitor_signal(struct urb *urb_out, unsigned char *signal,
			       int volume, int bytes_per_frame)
{
	if (volume == 0)
		return;		/* zero volume - no change */

	if (bytes_per_frame == 4) {
		short *pi, *po, *buf_end;
		pi = (short *)signal;
		po = (short *)urb_out->transfer_buffer;
		buf_end = po + urb_out->transfer_buffer_length / sizeof(*po);

		for (; po < buf_end; ++pi, ++po)
			*po += (*pi * volume) >> 8;
	}

	/*
	   We don't need to handle devices with 6 bytes per frame here
	   since they all support hardware monitoring.
	 */
}

/*
	Find a free URB, prepare audio data, and submit URB.
*/
static int submit_audio_out_urb(struct snd_line6_pcm *line6pcm)
{
	int index;
	unsigned long flags;
	int i, urb_size, urb_frames;
	int ret;
	const int bytes_per_frame = line6pcm->properties->bytes_per_frame;
	const int frame_increment =
	    line6pcm->properties->snd_line6_rates.rats[0].num_min;
	const int frame_factor =
	    line6pcm->properties->snd_line6_rates.rats[0].den *
	    (USB_INTERVALS_PER_SECOND / LINE6_ISO_INTERVAL);
	struct urb *urb_out;

	spin_lock_irqsave(&line6pcm->lock_audio_out, flags);
	index =
	    find_first_zero_bit(&line6pcm->active_urb_out, LINE6_ISO_BUFFERS);

	if (index < 0 || index >= LINE6_ISO_BUFFERS) {
		spin_unlock_irqrestore(&line6pcm->lock_audio_out, flags);
		dev_err(line6pcm->line6->ifcdev, "no free URB found\n");
		return -EINVAL;
	}

	urb_out = line6pcm->urb_audio_out[index];
	urb_size = 0;

	for (i = 0; i < LINE6_ISO_PACKETS; ++i) {
		/* compute frame size for given sampling rate */
		int fsize = 0;
		struct usb_iso_packet_descriptor *fout =
		    &urb_out->iso_frame_desc[i];

		if (line6pcm->flags & MASK_CAPTURE)
			fsize = line6pcm->prev_fsize;

		if (fsize == 0) {
			int n;
			line6pcm->count_out += frame_increment;
			n = line6pcm->count_out / frame_factor;
			line6pcm->count_out -= n * frame_factor;
			fsize = n * bytes_per_frame;
		}

		fout->offset = urb_size;
		fout->length = fsize;
		urb_size += fsize;
	}

	if (urb_size == 0) {
		/* can't determine URB size */
		spin_unlock_irqrestore(&line6pcm->lock_audio_out, flags);
		dev_err(line6pcm->line6->ifcdev, "driver bug: urb_size = 0\n");	/* this is somewhat paranoid */
		return -EINVAL;
	}

	urb_frames = urb_size / bytes_per_frame;
	urb_out->transfer_buffer =
	    line6pcm->buffer_out +
	    LINE6_ISO_PACKETS * line6pcm->max_packet_size * line6pcm->index_out;
	urb_out->transfer_buffer_length = urb_size;
	urb_out->context = line6pcm;

	if (++line6pcm->index_out == LINE6_ISO_BUFFERS)
		line6pcm->index_out = 0;

	if (test_bit(BIT_PCM_ALSA_PLAYBACK, &line6pcm->flags) &&
	    !test_bit(BIT_PAUSE_PLAYBACK, &line6pcm->flags)) {
		struct snd_pcm_runtime *runtime =
		    get_substream(line6pcm, SNDRV_PCM_STREAM_PLAYBACK)->runtime;

		if (line6pcm->pos_out + urb_frames > runtime->buffer_size) {
			/*
			   The transferred area goes over buffer boundary,
			   copy the data to the temp buffer.
			 */
			int len;
			len = runtime->buffer_size - line6pcm->pos_out;

			if (len > 0) {
				memcpy(urb_out->transfer_buffer,
				       runtime->dma_area +
				       line6pcm->pos_out * bytes_per_frame,
				       len * bytes_per_frame);
				memcpy(urb_out->transfer_buffer +
				       len * bytes_per_frame, runtime->dma_area,
				       (urb_frames - len) * bytes_per_frame);
			} else
				dev_err(line6pcm->line6->ifcdev, "driver bug: len = %d\n", len);	/* this is somewhat paranoid */
		} else {
			memcpy(urb_out->transfer_buffer,
			       runtime->dma_area +
			       line6pcm->pos_out * bytes_per_frame,
			       urb_out->transfer_buffer_length);
		}

		line6pcm->pos_out += urb_frames;
		if (line6pcm->pos_out >= runtime->buffer_size)
			line6pcm->pos_out -= runtime->buffer_size;
	} else {
		memset(urb_out->transfer_buffer, 0,
		       urb_out->transfer_buffer_length);
	}

	change_volume(urb_out, line6pcm->volume_playback, bytes_per_frame);

	if (line6pcm->prev_fbuf != NULL) {
#ifdef CONFIG_LINE6_USB_IMPULSE_RESPONSE
		if (line6pcm->flags & MASK_PCM_IMPULSE) {
			create_impulse_test_signal(line6pcm, urb_out,
						   bytes_per_frame);
			if (line6pcm->flags & MASK_PCM_ALSA_CAPTURE) {
				line6_capture_copy(line6pcm,
						   urb_out->transfer_buffer,
						   urb_out->
						   transfer_buffer_length);
				line6_capture_check_period(line6pcm,
							   urb_out->transfer_buffer_length);
			}
		} else {
#endif
			if (!
			    (line6pcm->line6->
			     properties->capabilities & LINE6_BIT_HWMON)
&& (line6pcm->flags & MASK_PLAYBACK)
&& (line6pcm->flags & MASK_CAPTURE))
				add_monitor_signal(urb_out, line6pcm->prev_fbuf,
						   line6pcm->volume_monitor,
						   bytes_per_frame);
#ifdef CONFIG_LINE6_USB_IMPULSE_RESPONSE
		}
#endif
	}
#ifdef CONFIG_LINE6_USB_DUMP_PCM
	for (i = 0; i < LINE6_ISO_PACKETS; ++i) {
		struct usb_iso_packet_descriptor *fout =
		    &urb_out->iso_frame_desc[i];
		line6_write_hexdump(line6pcm->line6, 'P',
				    urb_out->transfer_buffer + fout->offset,
				    fout->length);
	}
#endif

	ret = usb_submit_urb(urb_out, GFP_ATOMIC);

	if (ret == 0)
		set_bit(index, &line6pcm->active_urb_out);
	else
		dev_err(line6pcm->line6->ifcdev,
			"URB out #%d submission failed (%d)\n", index, ret);

	spin_unlock_irqrestore(&line6pcm->lock_audio_out, flags);
	return 0;
}

/*
	Submit all currently available playback URBs.
*/
int line6_submit_audio_out_all_urbs(struct snd_line6_pcm *line6pcm)
{
	int ret, i;

	for (i = 0; i < LINE6_ISO_BUFFERS; ++i) {
		ret = submit_audio_out_urb(line6pcm);
		if (ret < 0)
			return ret;
	}

	return 0;
}

/*
	Unlink all currently active playback URBs.
*/
void line6_unlink_audio_out_urbs(struct snd_line6_pcm *line6pcm)
{
	unsigned int i;

	for (i = LINE6_ISO_BUFFERS; i--;) {
		if (test_bit(i, &line6pcm->active_urb_out)) {
			if (!test_and_set_bit(i, &line6pcm->unlink_urb_out)) {
				struct urb *u = line6pcm->urb_audio_out[i];
				usb_unlink_urb(u);
			}
		}
	}
}

/*
	Wait until unlinking of all currently active playback URBs has been finished.
*/
static void wait_clear_audio_out_urbs(struct snd_line6_pcm *line6pcm)
{
	int timeout = HZ;
	unsigned int i;
	int alive;

	do {
		alive = 0;
		for (i = LINE6_ISO_BUFFERS; i--;) {
			if (test_bit(i, &line6pcm->active_urb_out))
				alive++;
		}
		if (!alive)
			break;
		set_current_state(TASK_UNINTERRUPTIBLE);
		schedule_timeout(1);
	} while (--timeout > 0);
	if (alive)
		snd_printk(KERN_ERR "timeout: still %d active urbs..\n", alive);
}

/*
	Unlink all currently active playback URBs, and wait for finishing.
*/
void line6_unlink_wait_clear_audio_out_urbs(struct snd_line6_pcm *line6pcm)
{
	line6_unlink_audio_out_urbs(line6pcm);
	wait_clear_audio_out_urbs(line6pcm);
}

/*
	Callback for completed playback URB.
*/
static void audio_out_callback(struct urb *urb)
{
	int i, index, length = 0, shutdown = 0;
	unsigned long flags;

	struct snd_line6_pcm *line6pcm = (struct snd_line6_pcm *)urb->context;
	struct snd_pcm_substream *substream =
	    get_substream(line6pcm, SNDRV_PCM_STREAM_PLAYBACK);

#if USE_CLEAR_BUFFER_WORKAROUND
	memset(urb->transfer_buffer, 0, urb->transfer_buffer_length);
#endif

	line6pcm->last_frame_out = urb->start_frame;

	/* find index of URB */
	for (index = LINE6_ISO_BUFFERS; index--;)
		if (urb == line6pcm->urb_audio_out[index])
			break;

	if (index < 0)
		return;		/* URB has been unlinked asynchronously */

	for (i = LINE6_ISO_PACKETS; i--;)
		length += urb->iso_frame_desc[i].length;

	spin_lock_irqsave(&line6pcm->lock_audio_out, flags);

	if (test_bit(BIT_PCM_ALSA_PLAYBACK, &line6pcm->flags)) {
		struct snd_pcm_runtime *runtime = substream->runtime;
		line6pcm->pos_out_done +=
		    length / line6pcm->properties->bytes_per_frame;

		if (line6pcm->pos_out_done >= runtime->buffer_size)
			line6pcm->pos_out_done -= runtime->buffer_size;
	}

	clear_bit(index, &line6pcm->active_urb_out);

	for (i = LINE6_ISO_PACKETS; i--;)
		if (urb->iso_frame_desc[i].status == -EXDEV) {
			shutdown = 1;
			break;
		}

	if (test_and_clear_bit(index, &line6pcm->unlink_urb_out))
		shutdown = 1;

	spin_unlock_irqrestore(&line6pcm->lock_audio_out, flags);

	if (!shutdown) {
		submit_audio_out_urb(line6pcm);

		if (test_bit(BIT_PCM_ALSA_PLAYBACK, &line6pcm->flags)) {
			line6pcm->bytes_out += length;
			if (line6pcm->bytes_out >= line6pcm->period_out) {
				line6pcm->bytes_out %= line6pcm->period_out;
				snd_pcm_period_elapsed(substream);
			}
		}
	}
}

/* open playback callback */
static int snd_line6_playback_open(struct snd_pcm_substream *substream)
{
	int err;
	struct snd_pcm_runtime *runtime = substream->runtime;
	struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);

	err = snd_pcm_hw_constraint_ratdens(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
					    (&line6pcm->
					     properties->snd_line6_rates));
	if (err < 0)
		return err;

	runtime->hw = line6pcm->properties->snd_line6_playback_hw;
	return 0;
}

/* close playback callback */
static int snd_line6_playback_close(struct snd_pcm_substream *substream)
{
	return 0;
}

/* hw_params playback callback */
static int snd_line6_playback_hw_params(struct snd_pcm_substream *substream,
					struct snd_pcm_hw_params *hw_params)
{
	int ret;
	struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);

	/* -- Florian Demski [FD] */
	/* don't ask me why, but this fixes the bug on my machine */
	if (line6pcm == NULL) {
		if (substream->pcm == NULL)
			return -ENOMEM;
		if (substream->pcm->private_data == NULL)
			return -ENOMEM;
		substream->private_data = substream->pcm->private_data;
		line6pcm = snd_pcm_substream_chip(substream);
	}
	/* -- [FD] end */

	/* We may be invoked multiple times in a row so allocate once only */
	if (!line6pcm->buffer_out)
		line6pcm->buffer_out =
			kmalloc(LINE6_ISO_BUFFERS * LINE6_ISO_PACKETS *
				line6pcm->max_packet_size, GFP_KERNEL);

	if (!line6pcm->buffer_out) {
		dev_err(line6pcm->line6->ifcdev,
			"cannot malloc playback buffer\n");
		return -ENOMEM;
	}

	ret = snd_pcm_lib_malloc_pages(substream,
				       params_buffer_bytes(hw_params));
	if (ret < 0)
		return ret;

	line6pcm->period_out = params_period_bytes(hw_params);
	return 0;
}

/* hw_free playback callback */
static int snd_line6_playback_hw_free(struct snd_pcm_substream *substream)
{
	struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);

	line6_unlink_wait_clear_audio_out_urbs(line6pcm);
	kfree(line6pcm->buffer_out);
	line6pcm->buffer_out = NULL;
	return snd_pcm_lib_free_pages(substream);
}

/* trigger playback callback */
int snd_line6_playback_trigger(struct snd_line6_pcm *line6pcm, int cmd)
{
	int err;

	switch (cmd) {
	case SNDRV_PCM_TRIGGER_START:
#ifdef CONFIG_PM
	case SNDRV_PCM_TRIGGER_RESUME:
#endif
		err = line6_pcm_start(line6pcm, MASK_PCM_ALSA_PLAYBACK);

		if (err < 0)
			return err;

		break;

	case SNDRV_PCM_TRIGGER_STOP:
#ifdef CONFIG_PM
	case SNDRV_PCM_TRIGGER_SUSPEND:
#endif
		err = line6_pcm_stop(line6pcm, MASK_PCM_ALSA_PLAYBACK);

		if (err < 0)
			return err;

		break;

	case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
		set_bit(BIT_PAUSE_PLAYBACK, &line6pcm->flags);
		break;

	case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
		clear_bit(BIT_PAUSE_PLAYBACK, &line6pcm->flags);
		break;

	default:
		return -EINVAL;
	}

	return 0;
}

/* playback pointer callback */
static snd_pcm_uframes_t
snd_line6_playback_pointer(struct snd_pcm_substream *substream)
{
	struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);
	return line6pcm->pos_out_done;
}

/* playback operators */
struct snd_pcm_ops snd_line6_playback_ops = {
	.open = snd_line6_playback_open,
	.close = snd_line6_playback_close,
	.ioctl = snd_pcm_lib_ioctl,
	.hw_params = snd_line6_playback_hw_params,
	.hw_free = snd_line6_playback_hw_free,
	.prepare = snd_line6_prepare,
	.trigger = snd_line6_trigger,
	.pointer = snd_line6_playback_pointer,
};

int line6_create_audio_out_urbs(struct snd_line6_pcm *line6pcm)
{
	int i;

	/* create audio URBs and fill in constant values: */
	for (i = 0; i < LINE6_ISO_BUFFERS; ++i) {
		struct urb *urb;

		/* URB for audio out: */
		urb = line6pcm->urb_audio_out[i] =
		    usb_alloc_urb(LINE6_ISO_PACKETS, GFP_KERNEL);

		if (urb == NULL) {
			dev_err(line6pcm->line6->ifcdev, "Out of memory\n");
			return -ENOMEM;
		}

		urb->dev = line6pcm->line6->usbdev;
		urb->pipe =
		    usb_sndisocpipe(line6pcm->line6->usbdev,
				    line6pcm->ep_audio_write &
				    USB_ENDPOINT_NUMBER_MASK);
		urb->transfer_flags = URB_ISO_ASAP;
		urb->start_frame = -1;
		urb->number_of_packets = LINE6_ISO_PACKETS;
		urb->interval = LINE6_ISO_INTERVAL;
		urb->error_count = 0;
		urb->complete = audio_out_callback;
	}

	return 0;
}
Commit	Line	Data
705ececd	1	/*
e1a164d7	2	* Line6 Linux USB driver - 0.9.1beta
705ececd	3	*
1027f476	4	* Copyright (C) 2004-2010 Markus Grabner (grabner@icg.tugraz.at)
705ececd MG	5	*
	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.
	9	*
	10	*/
	11
140e28b8	12	#include <linux/slab.h>
705ececd MG	13	#include <sound/core.h>
	14	#include <sound/pcm.h>
	15	#include <sound/pcm_params.h>
	16
	17	#include "audio.h"
1027f476 MG	18	#include "capture.h"
1027f476 MG	19	#include "driver.h"
705ececd MG	20	#include "pcm.h"
705ececd MG	21	#include "pod.h"
b702ed25	22	#include "playback.h"
705ececd	23
705ececd MG	24	/*
	25	Software stereo volume control.
	26	*/
010f378e GKH	27	static void change_volume(struct urb *urb_out, int volume[],
010f378e GKH	28	int bytes_per_frame)
705ececd MG	29	{
	30	int chn = 0;
	31
010f378e	32	if (volume[0] == 256 && volume[1] == 256)
45af4977	33	return; /* maximum volume - no change */
705ececd	34
010f378e	35	if (bytes_per_frame == 4) {
705ececd MG	36	short p, buf_end;
	37	p = (short *)urb_out->transfer_buffer;
	38	buf_end = p + urb_out->transfer_buffer_length / sizeof(*p);
	39
010f378e	40	for (; p < buf_end; ++p) {
705ececd MG	41	p = (p * volume[chn & 1]) >> 8;
	42	++chn;
	43	}
010f378e	44	} else if (bytes_per_frame == 6) {
705ececd MG	45	unsigned char p, buf_end;
	46	p = (unsigned char *)urb_out->transfer_buffer;
	47	buf_end = p + urb_out->transfer_buffer_length;
	48
010f378e GKH	49	for (; p < buf_end; p += 3) {
	50	int val;
	51	val = p[0] + (p[1] << 8) + ((signed char)p[2] << 16);
705ececd MG	52	val = (val * volume[chn & 1]) >> 8;
	53	p[0] = val;
	54	p[1] = val >> 8;
	55	p[2] = val >> 16;
	56	++chn;
	57	}
	58	}
	59	}
	60
1027f476 MG	61	#ifdef CONFIG_LINE6_USB_IMPULSE_RESPONSE
	62
	63	/*
	64	Create signal for impulse response test.
	65	*/
	66	static void create_impulse_test_signal(struct snd_line6_pcm *line6pcm,
	67	struct urb *urb_out, int bytes_per_frame)
	68	{
	69	int frames = urb_out->transfer_buffer_length / bytes_per_frame;
	70
	71	if (bytes_per_frame == 4) {
e1a164d7 MG	72	int i;
	73	short pi = (short )line6pcm->prev_fbuf;
	74	short po = (short )urb_out->transfer_buffer;
	75
	76	for (i = 0; i < frames; ++i) {
	77	po[0] = pi[0];
	78	po[1] = 0;
	79	pi += 2;
	80	po += 2;
	81	}
1027f476 MG	82	} else if (bytes_per_frame == 6) {
	83	int i, j;
	84	unsigned char *pi = line6pcm->prev_fbuf;
	85	unsigned char *po = urb_out->transfer_buffer;
	86
	87	for (i = 0; i < frames; ++i) {
	88	for (j = 0; j < bytes_per_frame / 2; ++j)
	89	po[j] = pi[j];
	90
	91	for (; j < bytes_per_frame; ++j)
	92	po[j] = 0;
	93
	94	pi += bytes_per_frame;
	95	po += bytes_per_frame;
	96	}
e1a164d7 MG	97	}
	98	if (--line6pcm->impulse_count <= 0) {
	99	((unsigned char *)(urb_out->transfer_buffer))[bytes_per_frame -
	100	1] =
	101	line6pcm->impulse_volume;
	102	line6pcm->impulse_count = line6pcm->impulse_period;
1027f476 MG	103	}
	104	}
	105
	106	#endif
	107
	108	/*
	109	Add signal to buffer for software monitoring.
	110	*/
	111	static void add_monitor_signal(struct urb urb_out, unsigned char signal,
	112	int volume, int bytes_per_frame)
	113	{
	114	if (volume == 0)
	115	return; /* zero volume - no change */
	116
	117	if (bytes_per_frame == 4) {
	118	short pi, po, *buf_end;
	119	pi = (short *)signal;
	120	po = (short *)urb_out->transfer_buffer;
	121	buf_end = po + urb_out->transfer_buffer_length / sizeof(*po);
	122
	123	for (; po < buf_end; ++pi, ++po)
	124	po += (pi * volume) >> 8;
	125	}
	126
	127	/*
e1a164d7 MG	128	We don't need to handle devices with 6 bytes per frame here
	129	since they all support hardware monitoring.
	130	*/
1027f476 MG	131	}
1027f476 MG	132
705ececd MG	133	/*
	134	Find a free URB, prepare audio data, and submit URB.
	135	*/
1027f476	136	static int submit_audio_out_urb(struct snd_line6_pcm *line6pcm)
705ececd MG	137	{
	138	int index;
	139	unsigned long flags;
	140	int i, urb_size, urb_frames;
e1a164d7	141	int ret;
705ececd	142	const int bytes_per_frame = line6pcm->properties->bytes_per_frame;
45af4977 SB	143	const int frame_increment =
	144	line6pcm->properties->snd_line6_rates.rats[0].num_min;
	145	const int frame_factor =
	146	line6pcm->properties->snd_line6_rates.rats[0].den *
	147	(USB_INTERVALS_PER_SECOND / LINE6_ISO_INTERVAL);
705ececd MG	148	struct urb *urb_out;
	149
	150	spin_lock_irqsave(&line6pcm->lock_audio_out, flags);
45af4977 SB	151	index =
45af4977 SB	152	find_first_zero_bit(&line6pcm->active_urb_out, LINE6_ISO_BUFFERS);
705ececd	153
010f378e	154	if (index < 0 \|\| index >= LINE6_ISO_BUFFERS) {
705ececd	155	spin_unlock_irqrestore(&line6pcm->lock_audio_out, flags);
1027f476	156	dev_err(line6pcm->line6->ifcdev, "no free URB found\n");
705ececd MG	157	return -EINVAL;
	158	}
	159
	160	urb_out = line6pcm->urb_audio_out[index];
	161	urb_size = 0;
	162
010f378e	163	for (i = 0; i < LINE6_ISO_PACKETS; ++i) {
705ececd	164	/* compute frame size for given sampling rate */
1027f476	165	int fsize = 0;
45af4977 SB	166	struct usb_iso_packet_descriptor *fout =
45af4977 SB	167	&urb_out->iso_frame_desc[i];
1027f476	168
027360c5	169	if (line6pcm->flags & MASK_CAPTURE)
1027f476	170	fsize = line6pcm->prev_fsize;
1027f476 MG	171
	172	if (fsize == 0) {
	173	int n;
	174	line6pcm->count_out += frame_increment;
	175	n = line6pcm->count_out / frame_factor;
	176	line6pcm->count_out -= n * frame_factor;
	177	fsize = n * bytes_per_frame;
	178	}
	179
705ececd	180	fout->offset = urb_size;
1027f476 MG	181	fout->length = fsize;
	182	urb_size += fsize;
	183	}
	184
	185	if (urb_size == 0) {
	186	/* can't determine URB size */
	187	spin_unlock_irqrestore(&line6pcm->lock_audio_out, flags);
	188	dev_err(line6pcm->line6->ifcdev, "driver bug: urb_size = 0\n"); /* this is somewhat paranoid */
	189	return -EINVAL;
705ececd MG	190	}
	191
	192	urb_frames = urb_size / bytes_per_frame;
1027f476 MG	193	urb_out->transfer_buffer =
1027f476 MG	194	line6pcm->buffer_out +
2f637ee4	195	LINE6_ISO_PACKETS * line6pcm->max_packet_size * line6pcm->index_out;
1027f476 MG	196	urb_out->transfer_buffer_length = urb_size;
	197	urb_out->context = line6pcm;
	198
	199	if (++line6pcm->index_out == LINE6_ISO_BUFFERS)
	200	line6pcm->index_out = 0;
	201
	202	if (test_bit(BIT_PCM_ALSA_PLAYBACK, &line6pcm->flags) &&
	203	!test_bit(BIT_PAUSE_PLAYBACK, &line6pcm->flags)) {
	204	struct snd_pcm_runtime *runtime =
	205	get_substream(line6pcm, SNDRV_PCM_STREAM_PLAYBACK)->runtime;
705ececd	206
010f378e	207	if (line6pcm->pos_out + urb_frames > runtime->buffer_size) {
705ececd	208	/*
45af4977 SB	209	The transferred area goes over buffer boundary,
	210	copy the data to the temp buffer.
	211	*/
705ececd MG	212	int len;
705ececd MG	213	len = runtime->buffer_size - line6pcm->pos_out;
705ececd	214
010f378e	215	if (len > 0) {
1027f476	216	memcpy(urb_out->transfer_buffer,
45af4977 SB	217	runtime->dma_area +
	218	line6pcm->pos_out * bytes_per_frame,
	219	len * bytes_per_frame);
1027f476	220	memcpy(urb_out->transfer_buffer +
45af4977 SB	221	len * bytes_per_frame, runtime->dma_area,
45af4977 SB	222	(urb_frames - len) * bytes_per_frame);
1027f476 MG	223	} else
1027f476 MG	224	dev_err(line6pcm->line6->ifcdev, "driver bug: len = %d\n", len); /* this is somewhat paranoid */
010f378e	225	} else {
1027f476 MG	226	memcpy(urb_out->transfer_buffer,
	227	runtime->dma_area +
	228	line6pcm->pos_out * bytes_per_frame,
	229	urb_out->transfer_buffer_length);
705ececd	230	}
705ececd	231
027360c5 GKH	232	line6pcm->pos_out += urb_frames;
027360c5 GKH	233	if (line6pcm->pos_out >= runtime->buffer_size)
1027f476 MG	234	line6pcm->pos_out -= runtime->buffer_size;
	235	} else {
	236	memset(urb_out->transfer_buffer, 0,
	237	urb_out->transfer_buffer_length);
	238	}
705ececd	239
1027f476	240	change_volume(urb_out, line6pcm->volume_playback, bytes_per_frame);
705ececd	241
597a1e7c	242	if (line6pcm->prev_fbuf != NULL) {
1027f476 MG	243	#ifdef CONFIG_LINE6_USB_IMPULSE_RESPONSE
	244	if (line6pcm->flags & MASK_PCM_IMPULSE) {
	245	create_impulse_test_signal(line6pcm, urb_out,
	246	bytes_per_frame);
	247	if (line6pcm->flags & MASK_PCM_ALSA_CAPTURE) {
e1a164d7 MG	248	line6_capture_copy(line6pcm,
	249	urb_out->transfer_buffer,
	250	urb_out->
	251	transfer_buffer_length);
	252	line6_capture_check_period(line6pcm,
	253	urb_out->transfer_buffer_length);
1027f476 MG	254	}
	255	} else {
	256	#endif
	257	if (!
e1a164d7 MG	258	(line6pcm->line6->
	259	properties->capabilities & LINE6_BIT_HWMON)
	260	&& (line6pcm->flags & MASK_PLAYBACK)
	261	&& (line6pcm->flags & MASK_CAPTURE))
1027f476 MG	262	add_monitor_signal(urb_out, line6pcm->prev_fbuf,
	263	line6pcm->volume_monitor,
	264	bytes_per_frame);
	265	#ifdef CONFIG_LINE6_USB_IMPULSE_RESPONSE
	266	}
	267	#endif
	268	}
	269	#ifdef CONFIG_LINE6_USB_DUMP_PCM
010f378e	270	for (i = 0; i < LINE6_ISO_PACKETS; ++i) {
45af4977 SB	271	struct usb_iso_packet_descriptor *fout =
	272	&urb_out->iso_frame_desc[i];
	273	line6_write_hexdump(line6pcm->line6, 'P',
	274	urb_out->transfer_buffer + fout->offset,
	275	fout->length);
705ececd MG	276	}
	277	#endif
	278
e1a164d7 MG	279	ret = usb_submit_urb(urb_out, GFP_ATOMIC);
	280
	281	if (ret == 0)
705ececd MG	282	set_bit(index, &line6pcm->active_urb_out);
705ececd MG	283	else
1027f476	284	dev_err(line6pcm->line6->ifcdev,
e1a164d7	285	"URB out #%d submission failed (%d)\n", index, ret);
705ececd MG	286
	287	spin_unlock_irqrestore(&line6pcm->lock_audio_out, flags);
	288	return 0;
	289	}
	290
	291	/*
	292	Submit all currently available playback URBs.
	293	*/
1027f476	294	int line6_submit_audio_out_all_urbs(struct snd_line6_pcm *line6pcm)
705ececd MG	295	{
	296	int ret, i;
	297
010f378e	298	for (i = 0; i < LINE6_ISO_BUFFERS; ++i) {
1027f476	299	ret = submit_audio_out_urb(line6pcm);
010f378e	300	if (ret < 0)
705ececd	301	return ret;
010f378e	302	}
705ececd MG	303
	304	return 0;
	305	}
	306
	307	/*
	308	Unlink all currently active playback URBs.
	309	*/
1027f476	310	void line6_unlink_audio_out_urbs(struct snd_line6_pcm *line6pcm)
705ececd MG	311	{
	312	unsigned int i;
	313
010f378e GKH	314	for (i = LINE6_ISO_BUFFERS; i--;) {
	315	if (test_bit(i, &line6pcm->active_urb_out)) {
	316	if (!test_and_set_bit(i, &line6pcm->unlink_urb_out)) {
705ececd	317	struct urb *u = line6pcm->urb_audio_out[i];
705ececd MG	318	usb_unlink_urb(u);
	319	}
	320	}
	321	}
	322	}
	323
	324	/*
1027f476	325	Wait until unlinking of all currently active playback URBs has been finished.
705ececd MG	326	*/
	327	static void wait_clear_audio_out_urbs(struct snd_line6_pcm *line6pcm)
	328	{
	329	int timeout = HZ;
	330	unsigned int i;
	331	int alive;
	332
	333	do {
	334	alive = 0;
	335	for (i = LINE6_ISO_BUFFERS; i--;) {
	336	if (test_bit(i, &line6pcm->active_urb_out))
	337	alive++;
	338	}
010f378e	339	if (!alive)
705ececd MG	340	break;
	341	set_current_state(TASK_UNINTERRUPTIBLE);
	342	schedule_timeout(1);
	343	} while (--timeout > 0);
	344	if (alive)
	345	snd_printk(KERN_ERR "timeout: still %d active urbs..\n", alive);
705ececd MG	346	}
	347
	348	/*
	349	Unlink all currently active playback URBs, and wait for finishing.
	350	*/
1027f476	351	void line6_unlink_wait_clear_audio_out_urbs(struct snd_line6_pcm *line6pcm)
705ececd	352	{
1027f476	353	line6_unlink_audio_out_urbs(line6pcm);
705ececd MG	354	wait_clear_audio_out_urbs(line6pcm);
	355	}
	356
	357	/*
	358	Callback for completed playback URB.
	359	*/
0c7ab158	360	static void audio_out_callback(struct urb *urb)
705ececd MG	361	{
	362	int i, index, length = 0, shutdown = 0;
	363	unsigned long flags;
	364
e1a164d7	365	struct snd_line6_pcm line6pcm = (struct snd_line6_pcm )urb->context;
45af4977	366	struct snd_pcm_substream *substream =
1027f476 MG	367	get_substream(line6pcm, SNDRV_PCM_STREAM_PLAYBACK);
	368
	369	#if USE_CLEAR_BUFFER_WORKAROUND
	370	memset(urb->transfer_buffer, 0, urb->transfer_buffer_length);
	371	#endif
	372
	373	line6pcm->last_frame_out = urb->start_frame;
705ececd MG	374
705ececd MG	375	/* find index of URB */
010f378e GKH	376	for (index = LINE6_ISO_BUFFERS; index--;)
010f378e GKH	377	if (urb == line6pcm->urb_audio_out[index])
705ececd MG	378	break;
705ececd MG	379
010f378e	380	if (index < 0)
45af4977	381	return; /* URB has been unlinked asynchronously */
705ececd	382
010f378e	383	for (i = LINE6_ISO_PACKETS; i--;)
705ececd MG	384	length += urb->iso_frame_desc[i].length;
	385
	386	spin_lock_irqsave(&line6pcm->lock_audio_out, flags);
705ececd	387
1027f476 MG	388	if (test_bit(BIT_PCM_ALSA_PLAYBACK, &line6pcm->flags)) {
	389	struct snd_pcm_runtime *runtime = substream->runtime;
	390	line6pcm->pos_out_done +=
	391	length / line6pcm->properties->bytes_per_frame;
	392
	393	if (line6pcm->pos_out_done >= runtime->buffer_size)
	394	line6pcm->pos_out_done -= runtime->buffer_size;
	395	}
705ececd MG	396
	397	clear_bit(index, &line6pcm->active_urb_out);
	398
010f378e	399	for (i = LINE6_ISO_PACKETS; i--;)
e1a164d7	400	if (urb->iso_frame_desc[i].status == -EXDEV) {
705ececd MG	401	shutdown = 1;
	402	break;
	403	}
	404
1027f476	405	if (test_and_clear_bit(index, &line6pcm->unlink_urb_out))
705ececd MG	406	shutdown = 1;
	407
	408	spin_unlock_irqrestore(&line6pcm->lock_audio_out, flags);
	409
010f378e	410	if (!shutdown) {
1027f476	411	submit_audio_out_urb(line6pcm);
705ececd	412
1027f476	413	if (test_bit(BIT_PCM_ALSA_PLAYBACK, &line6pcm->flags)) {
027360c5 GKH	414	line6pcm->bytes_out += length;
027360c5 GKH	415	if (line6pcm->bytes_out >= line6pcm->period_out) {
1027f476 MG	416	line6pcm->bytes_out %= line6pcm->period_out;
	417	snd_pcm_period_elapsed(substream);
	418	}
705ececd MG	419	}
	420	}
	421	}
	422
	423	/* open playback callback */
	424	static int snd_line6_playback_open(struct snd_pcm_substream *substream)
	425	{
	426	int err;
	427	struct snd_pcm_runtime *runtime = substream->runtime;
	428	struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);
	429
010f378e	430	err = snd_pcm_hw_constraint_ratdens(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
e1a164d7 MG	431	(&line6pcm->
e1a164d7 MG	432	properties->snd_line6_rates));
010f378e	433	if (err < 0)
705ececd MG	434	return err;
	435
	436	runtime->hw = line6pcm->properties->snd_line6_playback_hw;
	437	return 0;
	438	}
	439
	440	/* close playback callback */
	441	static int snd_line6_playback_close(struct snd_pcm_substream *substream)
	442	{
	443	return 0;
	444	}
	445
	446	/* hw_params playback callback */
45af4977 SB	447	static int snd_line6_playback_hw_params(struct snd_pcm_substream *substream,
45af4977 SB	448	struct snd_pcm_hw_params *hw_params)
705ececd MG	449	{
	450	int ret;
	451	struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);
	452
	453	/* -- Florian Demski [FD] */
	454	/* don't ask me why, but this fixes the bug on my machine */
010f378e GKH	455	if (line6pcm == NULL) {
010f378e GKH	456	if (substream->pcm == NULL)
705ececd	457	return -ENOMEM;
010f378e	458	if (substream->pcm->private_data == NULL)
705ececd MG	459	return -ENOMEM;
705ececd MG	460	substream->private_data = substream->pcm->private_data;
010f378e	461	line6pcm = snd_pcm_substream_chip(substream);
705ececd MG	462	}
	463	/* -- [FD] end */
	464
60c01a97 SH	465	/* We may be invoked multiple times in a row so allocate once only */
	466	if (!line6pcm->buffer_out)
	467	line6pcm->buffer_out =
	468	kmalloc(LINE6_ISO_BUFFERS * LINE6_ISO_PACKETS *
	469	line6pcm->max_packet_size, GFP_KERNEL);
140e28b8 SH	470
	471	if (!line6pcm->buffer_out) {
	472	dev_err(line6pcm->line6->ifcdev,
	473	"cannot malloc playback buffer\n");
	474	return -ENOMEM;
	475	}
	476
010f378e GKH	477	ret = snd_pcm_lib_malloc_pages(substream,
	478	params_buffer_bytes(hw_params));
	479	if (ret < 0)
705ececd MG	480	return ret;
	481
	482	line6pcm->period_out = params_period_bytes(hw_params);
705ececd MG	483	return 0;
	484	}
	485
	486	/* hw_free playback callback */
	487	static int snd_line6_playback_hw_free(struct snd_pcm_substream *substream)
	488	{
140e28b8 SH	489	struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);
	490
	491	line6_unlink_wait_clear_audio_out_urbs(line6pcm);
	492	kfree(line6pcm->buffer_out);
	493	line6pcm->buffer_out = NULL;
705ececd MG	494	return snd_pcm_lib_free_pages(substream);
	495	}
	496
	497	/* trigger playback callback */
1027f476	498	int snd_line6_playback_trigger(struct snd_line6_pcm *line6pcm, int cmd)
705ececd	499	{
705ececd	500	int err;
705ececd	501
010f378e	502	switch (cmd) {
705ececd	503	case SNDRV_PCM_TRIGGER_START:
1027f476 MG	504	#ifdef CONFIG_PM
	505	case SNDRV_PCM_TRIGGER_RESUME:
	506	#endif
	507	err = line6_pcm_start(line6pcm, MASK_PCM_ALSA_PLAYBACK);
705ececd	508
1027f476 MG	509	if (err < 0)
1027f476 MG	510	return err;
705ececd MG	511
	512	break;
	513
	514	case SNDRV_PCM_TRIGGER_STOP:
1027f476 MG	515	#ifdef CONFIG_PM
	516	case SNDRV_PCM_TRIGGER_SUSPEND:
	517	#endif
	518	err = line6_pcm_stop(line6pcm, MASK_PCM_ALSA_PLAYBACK);
	519
	520	if (err < 0)
	521	return err;
705ececd MG	522
	523	break;
	524
	525	case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
	526	set_bit(BIT_PAUSE_PLAYBACK, &line6pcm->flags);
	527	break;
	528
	529	case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
	530	clear_bit(BIT_PAUSE_PLAYBACK, &line6pcm->flags);
	531	break;
	532
	533	default:
	534	return -EINVAL;
	535	}
	536
	537	return 0;
	538	}
	539
	540	/* playback pointer callback */
	541	static snd_pcm_uframes_t
	542	snd_line6_playback_pointer(struct snd_pcm_substream *substream)
	543	{
	544	struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);
	545	return line6pcm->pos_out_done;
	546	}
	547
	548	/* playback operators */
	549	struct snd_pcm_ops snd_line6_playback_ops = {
e1a164d7 MG	550	.open = snd_line6_playback_open,
	551	.close = snd_line6_playback_close,
	552	.ioctl = snd_pcm_lib_ioctl,
	553	.hw_params = snd_line6_playback_hw_params,
	554	.hw_free = snd_line6_playback_hw_free,
	555	.prepare = snd_line6_prepare,
	556	.trigger = snd_line6_trigger,
	557	.pointer = snd_line6_playback_pointer,
705ececd MG	558	};
705ececd MG	559
1027f476	560	int line6_create_audio_out_urbs(struct snd_line6_pcm *line6pcm)
705ececd MG	561	{
	562	int i;
	563
	564	/* create audio URBs and fill in constant values: */
010f378e	565	for (i = 0; i < LINE6_ISO_BUFFERS; ++i) {
705ececd MG	566	struct urb *urb;
	567
	568	/* URB for audio out: */
45af4977 SB	569	urb = line6pcm->urb_audio_out[i] =
45af4977 SB	570	usb_alloc_urb(LINE6_ISO_PACKETS, GFP_KERNEL);
705ececd	571
010f378e	572	if (urb == NULL) {
705ececd MG	573	dev_err(line6pcm->line6->ifcdev, "Out of memory\n");
	574	return -ENOMEM;
	575	}
	576
	577	urb->dev = line6pcm->line6->usbdev;
45af4977 SB	578	urb->pipe =
45af4977 SB	579	usb_sndisocpipe(line6pcm->line6->usbdev,
e1a164d7 MG	580	line6pcm->ep_audio_write &
e1a164d7 MG	581	USB_ENDPOINT_NUMBER_MASK);
705ececd MG	582	urb->transfer_flags = URB_ISO_ASAP;
	583	urb->start_frame = -1;
	584	urb->number_of_packets = LINE6_ISO_PACKETS;
	585	urb->interval = LINE6_ISO_INTERVAL;
	586	urb->error_count = 0;
	587	urb->complete = audio_out_callback;
	588	}
	589
	590	return 0;
	591	}