• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*
2  *  Loopback soundcard
3  *
4  *  Original code:
5  *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
6  *
7  *  More accurate positioning and full-duplex support:
8  *  Copyright (c) Ahmet İnan <ainan at mathematik.uni-freiburg.de>
9  *
10  *  Major (almost complete) rewrite:
11  *  Copyright (c) by Takashi Iwai <tiwai@suse.de>
12  *
13  *  A next major update in 2010 (separate timers for playback and capture):
14  *  Copyright (c) Jaroslav Kysela <perex@perex.cz>
15  *
16  *   This program is free software; you can redistribute it and/or modify
17  *   it under the terms of the GNU General Public License as published by
18  *   the Free Software Foundation; either version 2 of the License, or
19  *   (at your option) any later version.
20  *
21  *   This program is distributed in the hope that it will be useful,
22  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
23  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
24  *   GNU General Public License for more details.
25  *
26  *   You should have received a copy of the GNU General Public License
27  *   along with this program; if not, write to the Free Software
28  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
29  *
30  */
31 
32 #include <linux/init.h>
33 #include <linux/jiffies.h>
34 #include <linux/slab.h>
35 #include <linux/time.h>
36 #include <linux/wait.h>
37 #include <linux/module.h>
38 #include <linux/platform_device.h>
39 #include <sound/core.h>
40 #include <sound/control.h>
41 #include <sound/pcm.h>
42 #include <sound/pcm_params.h>
43 #include <sound/info.h>
44 #include <sound/initval.h>
45 
46 MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>");
47 MODULE_DESCRIPTION("A loopback soundcard");
48 MODULE_LICENSE("GPL");
49 MODULE_SUPPORTED_DEVICE("{{ALSA,Loopback soundcard}}");
50 
51 #define MAX_PCM_SUBSTREAMS	8
52 
53 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;	/* Index 0-MAX */
54 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;	/* ID for this card */
55 static bool enable[SNDRV_CARDS] = {1, [1 ... (SNDRV_CARDS - 1)] = 0};
56 static int pcm_substreams[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 8};
57 static int pcm_notify[SNDRV_CARDS];
58 
59 module_param_array(index, int, NULL, 0444);
60 MODULE_PARM_DESC(index, "Index value for loopback soundcard.");
61 module_param_array(id, charp, NULL, 0444);
62 MODULE_PARM_DESC(id, "ID string for loopback soundcard.");
63 module_param_array(enable, bool, NULL, 0444);
64 MODULE_PARM_DESC(enable, "Enable this loopback soundcard.");
65 module_param_array(pcm_substreams, int, NULL, 0444);
66 MODULE_PARM_DESC(pcm_substreams, "PCM substreams # (1-8) for loopback driver.");
67 module_param_array(pcm_notify, int, NULL, 0444);
68 MODULE_PARM_DESC(pcm_notify, "Break capture when PCM format/rate/channels changes.");
69 
70 #define NO_PITCH 100000
71 
72 struct loopback_pcm;
73 
74 struct loopback_cable {
75 	spinlock_t lock;
76 	struct loopback_pcm *streams[2];
77 	struct snd_pcm_hardware hw;
78 	/* flags */
79 	unsigned int valid;
80 	unsigned int running;
81 	unsigned int pause;
82 };
83 
84 struct loopback_setup {
85 	unsigned int notify: 1;
86 	unsigned int rate_shift;
87 	unsigned int format;
88 	unsigned int rate;
89 	unsigned int channels;
90 	struct snd_ctl_elem_id active_id;
91 	struct snd_ctl_elem_id format_id;
92 	struct snd_ctl_elem_id rate_id;
93 	struct snd_ctl_elem_id channels_id;
94 };
95 
96 struct loopback {
97 	struct snd_card *card;
98 	struct mutex cable_lock;
99 	struct loopback_cable *cables[MAX_PCM_SUBSTREAMS][2];
100 	struct snd_pcm *pcm[2];
101 	struct loopback_setup setup[MAX_PCM_SUBSTREAMS][2];
102 };
103 
104 struct loopback_pcm {
105 	struct loopback *loopback;
106 	struct snd_pcm_substream *substream;
107 	struct loopback_cable *cable;
108 	unsigned int pcm_buffer_size;
109 	unsigned int buf_pos;	/* position in buffer */
110 	unsigned int silent_size;
111 	/* PCM parameters */
112 	unsigned int pcm_period_size;
113 	unsigned int pcm_bps;		/* bytes per second */
114 	unsigned int pcm_salign;	/* bytes per sample * channels */
115 	unsigned int pcm_rate_shift;	/* rate shift value */
116 	/* flags */
117 	unsigned int period_update_pending :1;
118 	/* timer stuff */
119 	unsigned int irq_pos;		/* fractional IRQ position */
120 	unsigned int period_size_frac;
121 	unsigned int last_drift;
122 	unsigned long last_jiffies;
123 	struct timer_list timer;
124 };
125 
126 static struct platform_device *devices[SNDRV_CARDS];
127 
byte_pos(struct loopback_pcm * dpcm,unsigned int x)128 static inline unsigned int byte_pos(struct loopback_pcm *dpcm, unsigned int x)
129 {
130 	if (dpcm->pcm_rate_shift == NO_PITCH) {
131 		x /= HZ;
132 	} else {
133 		x = div_u64(NO_PITCH * (unsigned long long)x,
134 			    HZ * (unsigned long long)dpcm->pcm_rate_shift);
135 	}
136 	return x - (x % dpcm->pcm_salign);
137 }
138 
frac_pos(struct loopback_pcm * dpcm,unsigned int x)139 static inline unsigned int frac_pos(struct loopback_pcm *dpcm, unsigned int x)
140 {
141 	if (dpcm->pcm_rate_shift == NO_PITCH) {	/* no pitch */
142 		return x * HZ;
143 	} else {
144 		x = div_u64(dpcm->pcm_rate_shift * (unsigned long long)x * HZ,
145 			    NO_PITCH);
146 	}
147 	return x;
148 }
149 
get_setup(struct loopback_pcm * dpcm)150 static inline struct loopback_setup *get_setup(struct loopback_pcm *dpcm)
151 {
152 	int device = dpcm->substream->pstr->pcm->device;
153 
154 	if (dpcm->substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
155 		device ^= 1;
156 	return &dpcm->loopback->setup[dpcm->substream->number][device];
157 }
158 
get_notify(struct loopback_pcm * dpcm)159 static inline unsigned int get_notify(struct loopback_pcm *dpcm)
160 {
161 	return get_setup(dpcm)->notify;
162 }
163 
get_rate_shift(struct loopback_pcm * dpcm)164 static inline unsigned int get_rate_shift(struct loopback_pcm *dpcm)
165 {
166 	return get_setup(dpcm)->rate_shift;
167 }
168 
169 /* call in cable->lock */
loopback_timer_start(struct loopback_pcm * dpcm)170 static void loopback_timer_start(struct loopback_pcm *dpcm)
171 {
172 	unsigned long tick;
173 	unsigned int rate_shift = get_rate_shift(dpcm);
174 
175 	if (rate_shift != dpcm->pcm_rate_shift) {
176 		dpcm->pcm_rate_shift = rate_shift;
177 		dpcm->period_size_frac = frac_pos(dpcm, dpcm->pcm_period_size);
178 	}
179 	if (dpcm->period_size_frac <= dpcm->irq_pos) {
180 		dpcm->irq_pos %= dpcm->period_size_frac;
181 		dpcm->period_update_pending = 1;
182 	}
183 	tick = dpcm->period_size_frac - dpcm->irq_pos;
184 	tick = (tick + dpcm->pcm_bps - 1) / dpcm->pcm_bps;
185 	mod_timer(&dpcm->timer, jiffies + tick);
186 }
187 
188 /* call in cable->lock */
loopback_timer_stop(struct loopback_pcm * dpcm)189 static inline void loopback_timer_stop(struct loopback_pcm *dpcm)
190 {
191 	del_timer(&dpcm->timer);
192 	dpcm->timer.expires = 0;
193 }
194 
loopback_timer_stop_sync(struct loopback_pcm * dpcm)195 static inline void loopback_timer_stop_sync(struct loopback_pcm *dpcm)
196 {
197 	del_timer_sync(&dpcm->timer);
198 }
199 
200 #define CABLE_VALID_PLAYBACK	(1 << SNDRV_PCM_STREAM_PLAYBACK)
201 #define CABLE_VALID_CAPTURE	(1 << SNDRV_PCM_STREAM_CAPTURE)
202 #define CABLE_VALID_BOTH	(CABLE_VALID_PLAYBACK|CABLE_VALID_CAPTURE)
203 
loopback_check_format(struct loopback_cable * cable,int stream)204 static int loopback_check_format(struct loopback_cable *cable, int stream)
205 {
206 	struct snd_pcm_runtime *runtime, *cruntime;
207 	struct loopback_setup *setup;
208 	struct snd_card *card;
209 	int check;
210 
211 	if (cable->valid != CABLE_VALID_BOTH) {
212 		if (stream == SNDRV_PCM_STREAM_PLAYBACK)
213 			goto __notify;
214 		return 0;
215 	}
216 	runtime = cable->streams[SNDRV_PCM_STREAM_PLAYBACK]->
217 							substream->runtime;
218 	cruntime = cable->streams[SNDRV_PCM_STREAM_CAPTURE]->
219 							substream->runtime;
220 	check = runtime->format != cruntime->format ||
221 		runtime->rate != cruntime->rate ||
222 		runtime->channels != cruntime->channels;
223 	if (!check)
224 		return 0;
225 	if (stream == SNDRV_PCM_STREAM_CAPTURE) {
226 		return -EIO;
227 	} else {
228 		snd_pcm_stop(cable->streams[SNDRV_PCM_STREAM_CAPTURE]->
229 					substream, SNDRV_PCM_STATE_DRAINING);
230 	      __notify:
231 		runtime = cable->streams[SNDRV_PCM_STREAM_PLAYBACK]->
232 							substream->runtime;
233 		setup = get_setup(cable->streams[SNDRV_PCM_STREAM_PLAYBACK]);
234 		card = cable->streams[SNDRV_PCM_STREAM_PLAYBACK]->loopback->card;
235 		if (setup->format != runtime->format) {
236 			snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
237 							&setup->format_id);
238 			setup->format = runtime->format;
239 		}
240 		if (setup->rate != runtime->rate) {
241 			snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
242 							&setup->rate_id);
243 			setup->rate = runtime->rate;
244 		}
245 		if (setup->channels != runtime->channels) {
246 			snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
247 							&setup->channels_id);
248 			setup->channels = runtime->channels;
249 		}
250 	}
251 	return 0;
252 }
253 
loopback_active_notify(struct loopback_pcm * dpcm)254 static void loopback_active_notify(struct loopback_pcm *dpcm)
255 {
256 	snd_ctl_notify(dpcm->loopback->card,
257 		       SNDRV_CTL_EVENT_MASK_VALUE,
258 		       &get_setup(dpcm)->active_id);
259 }
260 
loopback_trigger(struct snd_pcm_substream * substream,int cmd)261 static int loopback_trigger(struct snd_pcm_substream *substream, int cmd)
262 {
263 	struct snd_pcm_runtime *runtime = substream->runtime;
264 	struct loopback_pcm *dpcm = runtime->private_data;
265 	struct loopback_cable *cable = dpcm->cable;
266 	int err, stream = 1 << substream->stream;
267 
268 	switch (cmd) {
269 	case SNDRV_PCM_TRIGGER_START:
270 		err = loopback_check_format(cable, substream->stream);
271 		if (err < 0)
272 			return err;
273 		dpcm->last_jiffies = jiffies;
274 		dpcm->pcm_rate_shift = 0;
275 		dpcm->last_drift = 0;
276 		spin_lock(&cable->lock);
277 		cable->running |= stream;
278 		cable->pause &= ~stream;
279 		loopback_timer_start(dpcm);
280 		spin_unlock(&cable->lock);
281 		if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
282 			loopback_active_notify(dpcm);
283 		break;
284 	case SNDRV_PCM_TRIGGER_STOP:
285 		spin_lock(&cable->lock);
286 		cable->running &= ~stream;
287 		cable->pause &= ~stream;
288 		loopback_timer_stop(dpcm);
289 		spin_unlock(&cable->lock);
290 		if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
291 			loopback_active_notify(dpcm);
292 		break;
293 	case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
294 	case SNDRV_PCM_TRIGGER_SUSPEND:
295 		spin_lock(&cable->lock);
296 		cable->pause |= stream;
297 		loopback_timer_stop(dpcm);
298 		spin_unlock(&cable->lock);
299 		if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
300 			loopback_active_notify(dpcm);
301 		break;
302 	case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
303 	case SNDRV_PCM_TRIGGER_RESUME:
304 		spin_lock(&cable->lock);
305 		dpcm->last_jiffies = jiffies;
306 		cable->pause &= ~stream;
307 		loopback_timer_start(dpcm);
308 		spin_unlock(&cable->lock);
309 		if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
310 			loopback_active_notify(dpcm);
311 		break;
312 	default:
313 		return -EINVAL;
314 	}
315 	return 0;
316 }
317 
params_change(struct snd_pcm_substream * substream)318 static void params_change(struct snd_pcm_substream *substream)
319 {
320 	struct snd_pcm_runtime *runtime = substream->runtime;
321 	struct loopback_pcm *dpcm = runtime->private_data;
322 	struct loopback_cable *cable = dpcm->cable;
323 
324 	cable->hw.formats = pcm_format_to_bits(runtime->format);
325 	cable->hw.rate_min = runtime->rate;
326 	cable->hw.rate_max = runtime->rate;
327 	cable->hw.channels_min = runtime->channels;
328 	cable->hw.channels_max = runtime->channels;
329 }
330 
loopback_prepare(struct snd_pcm_substream * substream)331 static int loopback_prepare(struct snd_pcm_substream *substream)
332 {
333 	struct snd_pcm_runtime *runtime = substream->runtime;
334 	struct loopback_pcm *dpcm = runtime->private_data;
335 	struct loopback_cable *cable = dpcm->cable;
336 	int bps, salign;
337 
338 	loopback_timer_stop_sync(dpcm);
339 
340 	salign = (snd_pcm_format_width(runtime->format) *
341 						runtime->channels) / 8;
342 	bps = salign * runtime->rate;
343 	if (bps <= 0 || salign <= 0)
344 		return -EINVAL;
345 
346 	dpcm->buf_pos = 0;
347 	dpcm->pcm_buffer_size = frames_to_bytes(runtime, runtime->buffer_size);
348 	if (substream->stream == SNDRV_PCM_STREAM_CAPTURE) {
349 		/* clear capture buffer */
350 		dpcm->silent_size = dpcm->pcm_buffer_size;
351 		snd_pcm_format_set_silence(runtime->format, runtime->dma_area,
352 					   runtime->buffer_size * runtime->channels);
353 	}
354 
355 	dpcm->irq_pos = 0;
356 	dpcm->period_update_pending = 0;
357 	dpcm->pcm_bps = bps;
358 	dpcm->pcm_salign = salign;
359 	dpcm->pcm_period_size = frames_to_bytes(runtime, runtime->period_size);
360 
361 	mutex_lock(&dpcm->loopback->cable_lock);
362 	if (!(cable->valid & ~(1 << substream->stream)) ||
363             (get_setup(dpcm)->notify &&
364 	     substream->stream == SNDRV_PCM_STREAM_PLAYBACK))
365 		params_change(substream);
366 	cable->valid |= 1 << substream->stream;
367 	mutex_unlock(&dpcm->loopback->cable_lock);
368 
369 	return 0;
370 }
371 
clear_capture_buf(struct loopback_pcm * dpcm,unsigned int bytes)372 static void clear_capture_buf(struct loopback_pcm *dpcm, unsigned int bytes)
373 {
374 	struct snd_pcm_runtime *runtime = dpcm->substream->runtime;
375 	char *dst = runtime->dma_area;
376 	unsigned int dst_off = dpcm->buf_pos;
377 
378 	if (dpcm->silent_size >= dpcm->pcm_buffer_size)
379 		return;
380 	if (dpcm->silent_size + bytes > dpcm->pcm_buffer_size)
381 		bytes = dpcm->pcm_buffer_size - dpcm->silent_size;
382 
383 	for (;;) {
384 		unsigned int size = bytes;
385 		if (dst_off + size > dpcm->pcm_buffer_size)
386 			size = dpcm->pcm_buffer_size - dst_off;
387 		snd_pcm_format_set_silence(runtime->format, dst + dst_off,
388 					   bytes_to_frames(runtime, size) *
389 					   	runtime->channels);
390 		dpcm->silent_size += size;
391 		bytes -= size;
392 		if (!bytes)
393 			break;
394 		dst_off = 0;
395 	}
396 }
397 
copy_play_buf(struct loopback_pcm * play,struct loopback_pcm * capt,unsigned int bytes)398 static void copy_play_buf(struct loopback_pcm *play,
399 			  struct loopback_pcm *capt,
400 			  unsigned int bytes)
401 {
402 	struct snd_pcm_runtime *runtime = play->substream->runtime;
403 	char *src = runtime->dma_area;
404 	char *dst = capt->substream->runtime->dma_area;
405 	unsigned int src_off = play->buf_pos;
406 	unsigned int dst_off = capt->buf_pos;
407 	unsigned int clear_bytes = 0;
408 
409 	/* check if playback is draining, trim the capture copy size
410 	 * when our pointer is at the end of playback ring buffer */
411 	if (runtime->status->state == SNDRV_PCM_STATE_DRAINING &&
412 	    snd_pcm_playback_hw_avail(runtime) < runtime->buffer_size) {
413 	    	snd_pcm_uframes_t appl_ptr, appl_ptr1, diff;
414 		appl_ptr = appl_ptr1 = runtime->control->appl_ptr;
415 		appl_ptr1 -= appl_ptr1 % runtime->buffer_size;
416 		appl_ptr1 += play->buf_pos / play->pcm_salign;
417 		if (appl_ptr < appl_ptr1)
418 			appl_ptr1 -= runtime->buffer_size;
419 		diff = (appl_ptr - appl_ptr1) * play->pcm_salign;
420 		if (diff < bytes) {
421 			clear_bytes = bytes - diff;
422 			bytes = diff;
423 		}
424 	}
425 
426 	for (;;) {
427 		unsigned int size = bytes;
428 		if (src_off + size > play->pcm_buffer_size)
429 			size = play->pcm_buffer_size - src_off;
430 		if (dst_off + size > capt->pcm_buffer_size)
431 			size = capt->pcm_buffer_size - dst_off;
432 		memcpy(dst + dst_off, src + src_off, size);
433 		capt->silent_size = 0;
434 		bytes -= size;
435 		if (!bytes)
436 			break;
437 		src_off = (src_off + size) % play->pcm_buffer_size;
438 		dst_off = (dst_off + size) % capt->pcm_buffer_size;
439 	}
440 
441 	if (clear_bytes > 0) {
442 		clear_capture_buf(capt, clear_bytes);
443 		capt->silent_size = 0;
444 	}
445 }
446 
bytepos_delta(struct loopback_pcm * dpcm,unsigned int jiffies_delta)447 static inline unsigned int bytepos_delta(struct loopback_pcm *dpcm,
448 					 unsigned int jiffies_delta)
449 {
450 	unsigned long last_pos;
451 	unsigned int delta;
452 
453 	last_pos = byte_pos(dpcm, dpcm->irq_pos);
454 	dpcm->irq_pos += jiffies_delta * dpcm->pcm_bps;
455 	delta = byte_pos(dpcm, dpcm->irq_pos) - last_pos;
456 	if (delta >= dpcm->last_drift)
457 		delta -= dpcm->last_drift;
458 	dpcm->last_drift = 0;
459 	if (dpcm->irq_pos >= dpcm->period_size_frac) {
460 		dpcm->irq_pos %= dpcm->period_size_frac;
461 		dpcm->period_update_pending = 1;
462 	}
463 	return delta;
464 }
465 
bytepos_finish(struct loopback_pcm * dpcm,unsigned int delta)466 static inline void bytepos_finish(struct loopback_pcm *dpcm,
467 				  unsigned int delta)
468 {
469 	dpcm->buf_pos += delta;
470 	dpcm->buf_pos %= dpcm->pcm_buffer_size;
471 }
472 
473 /* call in cable->lock */
loopback_pos_update(struct loopback_cable * cable)474 static unsigned int loopback_pos_update(struct loopback_cable *cable)
475 {
476 	struct loopback_pcm *dpcm_play =
477 			cable->streams[SNDRV_PCM_STREAM_PLAYBACK];
478 	struct loopback_pcm *dpcm_capt =
479 			cable->streams[SNDRV_PCM_STREAM_CAPTURE];
480 	unsigned long delta_play = 0, delta_capt = 0;
481 	unsigned int running, count1, count2;
482 
483 	running = cable->running ^ cable->pause;
484 	if (running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) {
485 		delta_play = jiffies - dpcm_play->last_jiffies;
486 		dpcm_play->last_jiffies += delta_play;
487 	}
488 
489 	if (running & (1 << SNDRV_PCM_STREAM_CAPTURE)) {
490 		delta_capt = jiffies - dpcm_capt->last_jiffies;
491 		dpcm_capt->last_jiffies += delta_capt;
492 	}
493 
494 	if (delta_play == 0 && delta_capt == 0)
495 		goto unlock;
496 
497 	if (delta_play > delta_capt) {
498 		count1 = bytepos_delta(dpcm_play, delta_play - delta_capt);
499 		bytepos_finish(dpcm_play, count1);
500 		delta_play = delta_capt;
501 	} else if (delta_play < delta_capt) {
502 		count1 = bytepos_delta(dpcm_capt, delta_capt - delta_play);
503 		clear_capture_buf(dpcm_capt, count1);
504 		bytepos_finish(dpcm_capt, count1);
505 		delta_capt = delta_play;
506 	}
507 
508 	if (delta_play == 0 && delta_capt == 0)
509 		goto unlock;
510 
511 	/* note delta_capt == delta_play at this moment */
512 	count1 = bytepos_delta(dpcm_play, delta_play);
513 	count2 = bytepos_delta(dpcm_capt, delta_capt);
514 	if (count1 < count2) {
515 		dpcm_capt->last_drift = count2 - count1;
516 		count1 = count2;
517 	} else if (count1 > count2) {
518 		dpcm_play->last_drift = count1 - count2;
519 	}
520 	copy_play_buf(dpcm_play, dpcm_capt, count1);
521 	bytepos_finish(dpcm_play, count1);
522 	bytepos_finish(dpcm_capt, count1);
523  unlock:
524 	return running;
525 }
526 
loopback_timer_function(unsigned long data)527 static void loopback_timer_function(unsigned long data)
528 {
529 	struct loopback_pcm *dpcm = (struct loopback_pcm *)data;
530 	unsigned long flags;
531 
532 	spin_lock_irqsave(&dpcm->cable->lock, flags);
533 	if (loopback_pos_update(dpcm->cable) & (1 << dpcm->substream->stream)) {
534 		loopback_timer_start(dpcm);
535 		if (dpcm->period_update_pending) {
536 			dpcm->period_update_pending = 0;
537 			spin_unlock_irqrestore(&dpcm->cable->lock, flags);
538 			/* need to unlock before calling below */
539 			snd_pcm_period_elapsed(dpcm->substream);
540 			return;
541 		}
542 	}
543 	spin_unlock_irqrestore(&dpcm->cable->lock, flags);
544 }
545 
loopback_pointer(struct snd_pcm_substream * substream)546 static snd_pcm_uframes_t loopback_pointer(struct snd_pcm_substream *substream)
547 {
548 	struct snd_pcm_runtime *runtime = substream->runtime;
549 	struct loopback_pcm *dpcm = runtime->private_data;
550 	snd_pcm_uframes_t pos;
551 
552 	spin_lock(&dpcm->cable->lock);
553 	loopback_pos_update(dpcm->cable);
554 	pos = dpcm->buf_pos;
555 	spin_unlock(&dpcm->cable->lock);
556 	return bytes_to_frames(runtime, pos);
557 }
558 
559 static const struct snd_pcm_hardware loopback_pcm_hardware =
560 {
561 	.info =		(SNDRV_PCM_INFO_INTERLEAVED | SNDRV_PCM_INFO_MMAP |
562 			 SNDRV_PCM_INFO_MMAP_VALID | SNDRV_PCM_INFO_PAUSE |
563 			 SNDRV_PCM_INFO_RESUME),
564 	.formats =	(SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S16_BE |
565 			 SNDRV_PCM_FMTBIT_S32_LE | SNDRV_PCM_FMTBIT_S32_BE |
566 			 SNDRV_PCM_FMTBIT_FLOAT_LE | SNDRV_PCM_FMTBIT_FLOAT_BE),
567 	.rates =	SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_192000,
568 	.rate_min =		8000,
569 	.rate_max =		192000,
570 	.channels_min =		1,
571 	.channels_max =		32,
572 	.buffer_bytes_max =	2 * 1024 * 1024,
573 	.period_bytes_min =	64,
574 	/* note check overflow in frac_pos() using pcm_rate_shift before
575 	   changing period_bytes_max value */
576 	.period_bytes_max =	1024 * 1024,
577 	.periods_min =		1,
578 	.periods_max =		1024,
579 	.fifo_size =		0,
580 };
581 
loopback_runtime_free(struct snd_pcm_runtime * runtime)582 static void loopback_runtime_free(struct snd_pcm_runtime *runtime)
583 {
584 	struct loopback_pcm *dpcm = runtime->private_data;
585 	kfree(dpcm);
586 }
587 
loopback_hw_params(struct snd_pcm_substream * substream,struct snd_pcm_hw_params * params)588 static int loopback_hw_params(struct snd_pcm_substream *substream,
589 			      struct snd_pcm_hw_params *params)
590 {
591 	return snd_pcm_lib_alloc_vmalloc_buffer(substream,
592 						params_buffer_bytes(params));
593 }
594 
loopback_hw_free(struct snd_pcm_substream * substream)595 static int loopback_hw_free(struct snd_pcm_substream *substream)
596 {
597 	struct snd_pcm_runtime *runtime = substream->runtime;
598 	struct loopback_pcm *dpcm = runtime->private_data;
599 	struct loopback_cable *cable = dpcm->cable;
600 
601 	mutex_lock(&dpcm->loopback->cable_lock);
602 	cable->valid &= ~(1 << substream->stream);
603 	mutex_unlock(&dpcm->loopback->cable_lock);
604 	return snd_pcm_lib_free_vmalloc_buffer(substream);
605 }
606 
get_cable_index(struct snd_pcm_substream * substream)607 static unsigned int get_cable_index(struct snd_pcm_substream *substream)
608 {
609 	if (!substream->pcm->device)
610 		return substream->stream;
611 	else
612 		return !substream->stream;
613 }
614 
rule_format(struct snd_pcm_hw_params * params,struct snd_pcm_hw_rule * rule)615 static int rule_format(struct snd_pcm_hw_params *params,
616 		       struct snd_pcm_hw_rule *rule)
617 {
618 	struct loopback_pcm *dpcm = rule->private;
619 	struct loopback_cable *cable = dpcm->cable;
620 	struct snd_mask m;
621 
622 	snd_mask_none(&m);
623 	mutex_lock(&dpcm->loopback->cable_lock);
624 	m.bits[0] = (u_int32_t)cable->hw.formats;
625 	m.bits[1] = (u_int32_t)(cable->hw.formats >> 32);
626 	mutex_unlock(&dpcm->loopback->cable_lock);
627 	return snd_mask_refine(hw_param_mask(params, rule->var), &m);
628 }
629 
rule_rate(struct snd_pcm_hw_params * params,struct snd_pcm_hw_rule * rule)630 static int rule_rate(struct snd_pcm_hw_params *params,
631 		     struct snd_pcm_hw_rule *rule)
632 {
633 	struct loopback_pcm *dpcm = rule->private;
634 	struct loopback_cable *cable = dpcm->cable;
635 	struct snd_interval t;
636 
637 	mutex_lock(&dpcm->loopback->cable_lock);
638 	t.min = cable->hw.rate_min;
639 	t.max = cable->hw.rate_max;
640 	mutex_unlock(&dpcm->loopback->cable_lock);
641         t.openmin = t.openmax = 0;
642         t.integer = 0;
643 	return snd_interval_refine(hw_param_interval(params, rule->var), &t);
644 }
645 
rule_channels(struct snd_pcm_hw_params * params,struct snd_pcm_hw_rule * rule)646 static int rule_channels(struct snd_pcm_hw_params *params,
647 			 struct snd_pcm_hw_rule *rule)
648 {
649 	struct loopback_pcm *dpcm = rule->private;
650 	struct loopback_cable *cable = dpcm->cable;
651 	struct snd_interval t;
652 
653 	mutex_lock(&dpcm->loopback->cable_lock);
654 	t.min = cable->hw.channels_min;
655 	t.max = cable->hw.channels_max;
656 	mutex_unlock(&dpcm->loopback->cable_lock);
657         t.openmin = t.openmax = 0;
658         t.integer = 0;
659 	return snd_interval_refine(hw_param_interval(params, rule->var), &t);
660 }
661 
free_cable(struct snd_pcm_substream * substream)662 static void free_cable(struct snd_pcm_substream *substream)
663 {
664 	struct loopback *loopback = substream->private_data;
665 	int dev = get_cable_index(substream);
666 	struct loopback_cable *cable;
667 
668 	cable = loopback->cables[substream->number][dev];
669 	if (!cable)
670 		return;
671 	if (cable->streams[!substream->stream]) {
672 		/* other stream is still alive */
673 		spin_lock_irq(&cable->lock);
674 		cable->streams[substream->stream] = NULL;
675 		spin_unlock_irq(&cable->lock);
676 	} else {
677 		/* free the cable */
678 		loopback->cables[substream->number][dev] = NULL;
679 		kfree(cable);
680 	}
681 }
682 
loopback_open(struct snd_pcm_substream * substream)683 static int loopback_open(struct snd_pcm_substream *substream)
684 {
685 	struct snd_pcm_runtime *runtime = substream->runtime;
686 	struct loopback *loopback = substream->private_data;
687 	struct loopback_pcm *dpcm;
688 	struct loopback_cable *cable = NULL;
689 	int err = 0;
690 	int dev = get_cable_index(substream);
691 
692 	mutex_lock(&loopback->cable_lock);
693 	dpcm = kzalloc(sizeof(*dpcm), GFP_KERNEL);
694 	if (!dpcm) {
695 		err = -ENOMEM;
696 		goto unlock;
697 	}
698 	dpcm->loopback = loopback;
699 	dpcm->substream = substream;
700 	setup_timer(&dpcm->timer, loopback_timer_function,
701 		    (unsigned long)dpcm);
702 
703 	cable = loopback->cables[substream->number][dev];
704 	if (!cable) {
705 		cable = kzalloc(sizeof(*cable), GFP_KERNEL);
706 		if (!cable) {
707 			err = -ENOMEM;
708 			goto unlock;
709 		}
710 		spin_lock_init(&cable->lock);
711 		cable->hw = loopback_pcm_hardware;
712 		loopback->cables[substream->number][dev] = cable;
713 	}
714 	dpcm->cable = cable;
715 
716 	snd_pcm_hw_constraint_integer(runtime, SNDRV_PCM_HW_PARAM_PERIODS);
717 
718 	/* use dynamic rules based on actual runtime->hw values */
719 	/* note that the default rules created in the PCM midlevel code */
720 	/* are cached -> they do not reflect the actual state */
721 	err = snd_pcm_hw_rule_add(runtime, 0,
722 				  SNDRV_PCM_HW_PARAM_FORMAT,
723 				  rule_format, dpcm,
724 				  SNDRV_PCM_HW_PARAM_FORMAT, -1);
725 	if (err < 0)
726 		goto unlock;
727 	err = snd_pcm_hw_rule_add(runtime, 0,
728 				  SNDRV_PCM_HW_PARAM_RATE,
729 				  rule_rate, dpcm,
730 				  SNDRV_PCM_HW_PARAM_RATE, -1);
731 	if (err < 0)
732 		goto unlock;
733 	err = snd_pcm_hw_rule_add(runtime, 0,
734 				  SNDRV_PCM_HW_PARAM_CHANNELS,
735 				  rule_channels, dpcm,
736 				  SNDRV_PCM_HW_PARAM_CHANNELS, -1);
737 	if (err < 0)
738 		goto unlock;
739 
740 	runtime->private_data = dpcm;
741 	runtime->private_free = loopback_runtime_free;
742 	if (get_notify(dpcm))
743 		runtime->hw = loopback_pcm_hardware;
744 	else
745 		runtime->hw = cable->hw;
746 
747 	spin_lock_irq(&cable->lock);
748 	cable->streams[substream->stream] = dpcm;
749 	spin_unlock_irq(&cable->lock);
750 
751  unlock:
752 	if (err < 0) {
753 		free_cable(substream);
754 		kfree(dpcm);
755 	}
756 	mutex_unlock(&loopback->cable_lock);
757 	return err;
758 }
759 
loopback_close(struct snd_pcm_substream * substream)760 static int loopback_close(struct snd_pcm_substream *substream)
761 {
762 	struct loopback *loopback = substream->private_data;
763 	struct loopback_pcm *dpcm = substream->runtime->private_data;
764 
765 	loopback_timer_stop_sync(dpcm);
766 	mutex_lock(&loopback->cable_lock);
767 	free_cable(substream);
768 	mutex_unlock(&loopback->cable_lock);
769 	return 0;
770 }
771 
772 static const struct snd_pcm_ops loopback_playback_ops = {
773 	.open =		loopback_open,
774 	.close =	loopback_close,
775 	.ioctl =	snd_pcm_lib_ioctl,
776 	.hw_params =	loopback_hw_params,
777 	.hw_free =	loopback_hw_free,
778 	.prepare =	loopback_prepare,
779 	.trigger =	loopback_trigger,
780 	.pointer =	loopback_pointer,
781 	.page =		snd_pcm_lib_get_vmalloc_page,
782 	.mmap =		snd_pcm_lib_mmap_vmalloc,
783 };
784 
785 static const struct snd_pcm_ops loopback_capture_ops = {
786 	.open =		loopback_open,
787 	.close =	loopback_close,
788 	.ioctl =	snd_pcm_lib_ioctl,
789 	.hw_params =	loopback_hw_params,
790 	.hw_free =	loopback_hw_free,
791 	.prepare =	loopback_prepare,
792 	.trigger =	loopback_trigger,
793 	.pointer =	loopback_pointer,
794 	.page =		snd_pcm_lib_get_vmalloc_page,
795 	.mmap =		snd_pcm_lib_mmap_vmalloc,
796 };
797 
loopback_pcm_new(struct loopback * loopback,int device,int substreams)798 static int loopback_pcm_new(struct loopback *loopback,
799 			    int device, int substreams)
800 {
801 	struct snd_pcm *pcm;
802 	int err;
803 
804 	err = snd_pcm_new(loopback->card, "Loopback PCM", device,
805 			  substreams, substreams, &pcm);
806 	if (err < 0)
807 		return err;
808 	snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &loopback_playback_ops);
809 	snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &loopback_capture_ops);
810 
811 	pcm->private_data = loopback;
812 	pcm->info_flags = 0;
813 	strcpy(pcm->name, "Loopback PCM");
814 
815 	loopback->pcm[device] = pcm;
816 	return 0;
817 }
818 
loopback_rate_shift_info(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_info * uinfo)819 static int loopback_rate_shift_info(struct snd_kcontrol *kcontrol,
820 				    struct snd_ctl_elem_info *uinfo)
821 {
822 	uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
823 	uinfo->count = 1;
824 	uinfo->value.integer.min = 80000;
825 	uinfo->value.integer.max = 120000;
826 	uinfo->value.integer.step = 1;
827 	return 0;
828 }
829 
loopback_rate_shift_get(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)830 static int loopback_rate_shift_get(struct snd_kcontrol *kcontrol,
831 				   struct snd_ctl_elem_value *ucontrol)
832 {
833 	struct loopback *loopback = snd_kcontrol_chip(kcontrol);
834 
835 	mutex_lock(&loopback->cable_lock);
836 	ucontrol->value.integer.value[0] =
837 		loopback->setup[kcontrol->id.subdevice]
838 			       [kcontrol->id.device].rate_shift;
839 	mutex_unlock(&loopback->cable_lock);
840 	return 0;
841 }
842 
loopback_rate_shift_put(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)843 static int loopback_rate_shift_put(struct snd_kcontrol *kcontrol,
844 				   struct snd_ctl_elem_value *ucontrol)
845 {
846 	struct loopback *loopback = snd_kcontrol_chip(kcontrol);
847 	unsigned int val;
848 	int change = 0;
849 
850 	val = ucontrol->value.integer.value[0];
851 	if (val < 80000)
852 		val = 80000;
853 	if (val > 120000)
854 		val = 120000;
855 	mutex_lock(&loopback->cable_lock);
856 	if (val != loopback->setup[kcontrol->id.subdevice]
857 				  [kcontrol->id.device].rate_shift) {
858 		loopback->setup[kcontrol->id.subdevice]
859 			       [kcontrol->id.device].rate_shift = val;
860 		change = 1;
861 	}
862 	mutex_unlock(&loopback->cable_lock);
863 	return change;
864 }
865 
loopback_notify_get(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)866 static int loopback_notify_get(struct snd_kcontrol *kcontrol,
867 			       struct snd_ctl_elem_value *ucontrol)
868 {
869 	struct loopback *loopback = snd_kcontrol_chip(kcontrol);
870 
871 	mutex_lock(&loopback->cable_lock);
872 	ucontrol->value.integer.value[0] =
873 		loopback->setup[kcontrol->id.subdevice]
874 			       [kcontrol->id.device].notify;
875 	mutex_unlock(&loopback->cable_lock);
876 	return 0;
877 }
878 
loopback_notify_put(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)879 static int loopback_notify_put(struct snd_kcontrol *kcontrol,
880 			       struct snd_ctl_elem_value *ucontrol)
881 {
882 	struct loopback *loopback = snd_kcontrol_chip(kcontrol);
883 	unsigned int val;
884 	int change = 0;
885 
886 	val = ucontrol->value.integer.value[0] ? 1 : 0;
887 	mutex_lock(&loopback->cable_lock);
888 	if (val != loopback->setup[kcontrol->id.subdevice]
889 				[kcontrol->id.device].notify) {
890 		loopback->setup[kcontrol->id.subdevice]
891 			[kcontrol->id.device].notify = val;
892 		change = 1;
893 	}
894 	mutex_unlock(&loopback->cable_lock);
895 	return change;
896 }
897 
loopback_active_get(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)898 static int loopback_active_get(struct snd_kcontrol *kcontrol,
899 			       struct snd_ctl_elem_value *ucontrol)
900 {
901 	struct loopback *loopback = snd_kcontrol_chip(kcontrol);
902 	struct loopback_cable *cable;
903 
904 	unsigned int val = 0;
905 
906 	mutex_lock(&loopback->cable_lock);
907 	cable = loopback->cables[kcontrol->id.subdevice][kcontrol->id.device ^ 1];
908 	if (cable != NULL) {
909 		unsigned int running = cable->running ^ cable->pause;
910 
911 		val = (running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) ? 1 : 0;
912 	}
913 	mutex_unlock(&loopback->cable_lock);
914 	ucontrol->value.integer.value[0] = val;
915 	return 0;
916 }
917 
loopback_format_info(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_info * uinfo)918 static int loopback_format_info(struct snd_kcontrol *kcontrol,
919 				struct snd_ctl_elem_info *uinfo)
920 {
921 	uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
922 	uinfo->count = 1;
923 	uinfo->value.integer.min = 0;
924 	uinfo->value.integer.max = SNDRV_PCM_FORMAT_LAST;
925 	uinfo->value.integer.step = 1;
926 	return 0;
927 }
928 
loopback_format_get(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)929 static int loopback_format_get(struct snd_kcontrol *kcontrol,
930 			       struct snd_ctl_elem_value *ucontrol)
931 {
932 	struct loopback *loopback = snd_kcontrol_chip(kcontrol);
933 
934 	ucontrol->value.integer.value[0] =
935 		loopback->setup[kcontrol->id.subdevice]
936 			       [kcontrol->id.device].format;
937 	return 0;
938 }
939 
loopback_rate_info(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_info * uinfo)940 static int loopback_rate_info(struct snd_kcontrol *kcontrol,
941 			      struct snd_ctl_elem_info *uinfo)
942 {
943 	uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
944 	uinfo->count = 1;
945 	uinfo->value.integer.min = 0;
946 	uinfo->value.integer.max = 192000;
947 	uinfo->value.integer.step = 1;
948 	return 0;
949 }
950 
loopback_rate_get(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)951 static int loopback_rate_get(struct snd_kcontrol *kcontrol,
952 			     struct snd_ctl_elem_value *ucontrol)
953 {
954 	struct loopback *loopback = snd_kcontrol_chip(kcontrol);
955 
956 	mutex_lock(&loopback->cable_lock);
957 	ucontrol->value.integer.value[0] =
958 		loopback->setup[kcontrol->id.subdevice]
959 			       [kcontrol->id.device].rate;
960 	mutex_unlock(&loopback->cable_lock);
961 	return 0;
962 }
963 
loopback_channels_info(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_info * uinfo)964 static int loopback_channels_info(struct snd_kcontrol *kcontrol,
965 				  struct snd_ctl_elem_info *uinfo)
966 {
967 	uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
968 	uinfo->count = 1;
969 	uinfo->value.integer.min = 1;
970 	uinfo->value.integer.max = 1024;
971 	uinfo->value.integer.step = 1;
972 	return 0;
973 }
974 
loopback_channels_get(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)975 static int loopback_channels_get(struct snd_kcontrol *kcontrol,
976 				 struct snd_ctl_elem_value *ucontrol)
977 {
978 	struct loopback *loopback = snd_kcontrol_chip(kcontrol);
979 
980 	mutex_lock(&loopback->cable_lock);
981 	ucontrol->value.integer.value[0] =
982 		loopback->setup[kcontrol->id.subdevice]
983 			       [kcontrol->id.device].channels;
984 	mutex_unlock(&loopback->cable_lock);
985 	return 0;
986 }
987 
988 static struct snd_kcontrol_new loopback_controls[]  = {
989 {
990 	.iface =        SNDRV_CTL_ELEM_IFACE_PCM,
991 	.name =         "PCM Rate Shift 100000",
992 	.info =         loopback_rate_shift_info,
993 	.get =          loopback_rate_shift_get,
994 	.put =          loopback_rate_shift_put,
995 },
996 {
997 	.iface =        SNDRV_CTL_ELEM_IFACE_PCM,
998 	.name =         "PCM Notify",
999 	.info =         snd_ctl_boolean_mono_info,
1000 	.get =          loopback_notify_get,
1001 	.put =          loopback_notify_put,
1002 },
1003 #define ACTIVE_IDX 2
1004 {
1005 	.access =	SNDRV_CTL_ELEM_ACCESS_READ,
1006 	.iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1007 	.name =         "PCM Slave Active",
1008 	.info =         snd_ctl_boolean_mono_info,
1009 	.get =          loopback_active_get,
1010 },
1011 #define FORMAT_IDX 3
1012 {
1013 	.access =	SNDRV_CTL_ELEM_ACCESS_READ,
1014 	.iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1015 	.name =         "PCM Slave Format",
1016 	.info =         loopback_format_info,
1017 	.get =          loopback_format_get
1018 },
1019 #define RATE_IDX 4
1020 {
1021 	.access =	SNDRV_CTL_ELEM_ACCESS_READ,
1022 	.iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1023 	.name =         "PCM Slave Rate",
1024 	.info =         loopback_rate_info,
1025 	.get =          loopback_rate_get
1026 },
1027 #define CHANNELS_IDX 5
1028 {
1029 	.access =	SNDRV_CTL_ELEM_ACCESS_READ,
1030 	.iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1031 	.name =         "PCM Slave Channels",
1032 	.info =         loopback_channels_info,
1033 	.get =          loopback_channels_get
1034 }
1035 };
1036 
loopback_mixer_new(struct loopback * loopback,int notify)1037 static int loopback_mixer_new(struct loopback *loopback, int notify)
1038 {
1039 	struct snd_card *card = loopback->card;
1040 	struct snd_pcm *pcm;
1041 	struct snd_kcontrol *kctl;
1042 	struct loopback_setup *setup;
1043 	int err, dev, substr, substr_count, idx;
1044 
1045 	strcpy(card->mixername, "Loopback Mixer");
1046 	for (dev = 0; dev < 2; dev++) {
1047 		pcm = loopback->pcm[dev];
1048 		substr_count =
1049 		    pcm->streams[SNDRV_PCM_STREAM_CAPTURE].substream_count;
1050 		for (substr = 0; substr < substr_count; substr++) {
1051 			setup = &loopback->setup[substr][dev];
1052 			setup->notify = notify;
1053 			setup->rate_shift = NO_PITCH;
1054 			setup->format = SNDRV_PCM_FORMAT_S16_LE;
1055 			setup->rate = 48000;
1056 			setup->channels = 2;
1057 			for (idx = 0; idx < ARRAY_SIZE(loopback_controls);
1058 									idx++) {
1059 				kctl = snd_ctl_new1(&loopback_controls[idx],
1060 						    loopback);
1061 				if (!kctl)
1062 					return -ENOMEM;
1063 				kctl->id.device = dev;
1064 				kctl->id.subdevice = substr;
1065 				switch (idx) {
1066 				case ACTIVE_IDX:
1067 					setup->active_id = kctl->id;
1068 					break;
1069 				case FORMAT_IDX:
1070 					setup->format_id = kctl->id;
1071 					break;
1072 				case RATE_IDX:
1073 					setup->rate_id = kctl->id;
1074 					break;
1075 				case CHANNELS_IDX:
1076 					setup->channels_id = kctl->id;
1077 					break;
1078 				default:
1079 					break;
1080 				}
1081 				err = snd_ctl_add(card, kctl);
1082 				if (err < 0)
1083 					return err;
1084 			}
1085 		}
1086 	}
1087 	return 0;
1088 }
1089 
print_dpcm_info(struct snd_info_buffer * buffer,struct loopback_pcm * dpcm,const char * id)1090 static void print_dpcm_info(struct snd_info_buffer *buffer,
1091 			    struct loopback_pcm *dpcm,
1092 			    const char *id)
1093 {
1094 	snd_iprintf(buffer, "  %s\n", id);
1095 	if (dpcm == NULL) {
1096 		snd_iprintf(buffer, "    inactive\n");
1097 		return;
1098 	}
1099 	snd_iprintf(buffer, "    buffer_size:\t%u\n", dpcm->pcm_buffer_size);
1100 	snd_iprintf(buffer, "    buffer_pos:\t\t%u\n", dpcm->buf_pos);
1101 	snd_iprintf(buffer, "    silent_size:\t%u\n", dpcm->silent_size);
1102 	snd_iprintf(buffer, "    period_size:\t%u\n", dpcm->pcm_period_size);
1103 	snd_iprintf(buffer, "    bytes_per_sec:\t%u\n", dpcm->pcm_bps);
1104 	snd_iprintf(buffer, "    sample_align:\t%u\n", dpcm->pcm_salign);
1105 	snd_iprintf(buffer, "    rate_shift:\t\t%u\n", dpcm->pcm_rate_shift);
1106 	snd_iprintf(buffer, "    update_pending:\t%u\n",
1107 						dpcm->period_update_pending);
1108 	snd_iprintf(buffer, "    irq_pos:\t\t%u\n", dpcm->irq_pos);
1109 	snd_iprintf(buffer, "    period_frac:\t%u\n", dpcm->period_size_frac);
1110 	snd_iprintf(buffer, "    last_jiffies:\t%lu (%lu)\n",
1111 					dpcm->last_jiffies, jiffies);
1112 	snd_iprintf(buffer, "    timer_expires:\t%lu\n", dpcm->timer.expires);
1113 }
1114 
print_substream_info(struct snd_info_buffer * buffer,struct loopback * loopback,int sub,int num)1115 static void print_substream_info(struct snd_info_buffer *buffer,
1116 				 struct loopback *loopback,
1117 				 int sub,
1118 				 int num)
1119 {
1120 	struct loopback_cable *cable = loopback->cables[sub][num];
1121 
1122 	snd_iprintf(buffer, "Cable %i substream %i:\n", num, sub);
1123 	if (cable == NULL) {
1124 		snd_iprintf(buffer, "  inactive\n");
1125 		return;
1126 	}
1127 	snd_iprintf(buffer, "  valid: %u\n", cable->valid);
1128 	snd_iprintf(buffer, "  running: %u\n", cable->running);
1129 	snd_iprintf(buffer, "  pause: %u\n", cable->pause);
1130 	print_dpcm_info(buffer, cable->streams[0], "Playback");
1131 	print_dpcm_info(buffer, cable->streams[1], "Capture");
1132 }
1133 
print_cable_info(struct snd_info_entry * entry,struct snd_info_buffer * buffer)1134 static void print_cable_info(struct snd_info_entry *entry,
1135 			     struct snd_info_buffer *buffer)
1136 {
1137 	struct loopback *loopback = entry->private_data;
1138 	int sub, num;
1139 
1140 	mutex_lock(&loopback->cable_lock);
1141 	num = entry->name[strlen(entry->name)-1];
1142 	num = num == '0' ? 0 : 1;
1143 	for (sub = 0; sub < MAX_PCM_SUBSTREAMS; sub++)
1144 		print_substream_info(buffer, loopback, sub, num);
1145 	mutex_unlock(&loopback->cable_lock);
1146 }
1147 
loopback_proc_new(struct loopback * loopback,int cidx)1148 static int loopback_proc_new(struct loopback *loopback, int cidx)
1149 {
1150 	char name[32];
1151 	struct snd_info_entry *entry;
1152 	int err;
1153 
1154 	snprintf(name, sizeof(name), "cable#%d", cidx);
1155 	err = snd_card_proc_new(loopback->card, name, &entry);
1156 	if (err < 0)
1157 		return err;
1158 
1159 	snd_info_set_text_ops(entry, loopback, print_cable_info);
1160 	return 0;
1161 }
1162 
loopback_probe(struct platform_device * devptr)1163 static int loopback_probe(struct platform_device *devptr)
1164 {
1165 	struct snd_card *card;
1166 	struct loopback *loopback;
1167 	int dev = devptr->id;
1168 	int err;
1169 
1170 	err = snd_card_new(&devptr->dev, index[dev], id[dev], THIS_MODULE,
1171 			   sizeof(struct loopback), &card);
1172 	if (err < 0)
1173 		return err;
1174 	loopback = card->private_data;
1175 
1176 	if (pcm_substreams[dev] < 1)
1177 		pcm_substreams[dev] = 1;
1178 	if (pcm_substreams[dev] > MAX_PCM_SUBSTREAMS)
1179 		pcm_substreams[dev] = MAX_PCM_SUBSTREAMS;
1180 
1181 	loopback->card = card;
1182 	mutex_init(&loopback->cable_lock);
1183 
1184 	err = loopback_pcm_new(loopback, 0, pcm_substreams[dev]);
1185 	if (err < 0)
1186 		goto __nodev;
1187 	err = loopback_pcm_new(loopback, 1, pcm_substreams[dev]);
1188 	if (err < 0)
1189 		goto __nodev;
1190 	err = loopback_mixer_new(loopback, pcm_notify[dev] ? 1 : 0);
1191 	if (err < 0)
1192 		goto __nodev;
1193 	loopback_proc_new(loopback, 0);
1194 	loopback_proc_new(loopback, 1);
1195 	strcpy(card->driver, "Loopback");
1196 	strcpy(card->shortname, "Loopback");
1197 	sprintf(card->longname, "Loopback %i", dev + 1);
1198 	err = snd_card_register(card);
1199 	if (!err) {
1200 		platform_set_drvdata(devptr, card);
1201 		return 0;
1202 	}
1203       __nodev:
1204 	snd_card_free(card);
1205 	return err;
1206 }
1207 
loopback_remove(struct platform_device * devptr)1208 static int loopback_remove(struct platform_device *devptr)
1209 {
1210 	snd_card_free(platform_get_drvdata(devptr));
1211 	return 0;
1212 }
1213 
1214 #ifdef CONFIG_PM_SLEEP
loopback_suspend(struct device * pdev)1215 static int loopback_suspend(struct device *pdev)
1216 {
1217 	struct snd_card *card = dev_get_drvdata(pdev);
1218 	struct loopback *loopback = card->private_data;
1219 
1220 	snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
1221 
1222 	snd_pcm_suspend_all(loopback->pcm[0]);
1223 	snd_pcm_suspend_all(loopback->pcm[1]);
1224 	return 0;
1225 }
1226 
loopback_resume(struct device * pdev)1227 static int loopback_resume(struct device *pdev)
1228 {
1229 	struct snd_card *card = dev_get_drvdata(pdev);
1230 
1231 	snd_power_change_state(card, SNDRV_CTL_POWER_D0);
1232 	return 0;
1233 }
1234 
1235 static SIMPLE_DEV_PM_OPS(loopback_pm, loopback_suspend, loopback_resume);
1236 #define LOOPBACK_PM_OPS	&loopback_pm
1237 #else
1238 #define LOOPBACK_PM_OPS	NULL
1239 #endif
1240 
1241 #define SND_LOOPBACK_DRIVER	"snd_aloop"
1242 
1243 static struct platform_driver loopback_driver = {
1244 	.probe		= loopback_probe,
1245 	.remove		= loopback_remove,
1246 	.driver		= {
1247 		.name	= SND_LOOPBACK_DRIVER,
1248 		.pm	= LOOPBACK_PM_OPS,
1249 	},
1250 };
1251 
loopback_unregister_all(void)1252 static void loopback_unregister_all(void)
1253 {
1254 	int i;
1255 
1256 	for (i = 0; i < ARRAY_SIZE(devices); ++i)
1257 		platform_device_unregister(devices[i]);
1258 	platform_driver_unregister(&loopback_driver);
1259 }
1260 
alsa_card_loopback_init(void)1261 static int __init alsa_card_loopback_init(void)
1262 {
1263 	int i, err, cards;
1264 
1265 	err = platform_driver_register(&loopback_driver);
1266 	if (err < 0)
1267 		return err;
1268 
1269 
1270 	cards = 0;
1271 	for (i = 0; i < SNDRV_CARDS; i++) {
1272 		struct platform_device *device;
1273 		if (!enable[i])
1274 			continue;
1275 		device = platform_device_register_simple(SND_LOOPBACK_DRIVER,
1276 							 i, NULL, 0);
1277 		if (IS_ERR(device))
1278 			continue;
1279 		if (!platform_get_drvdata(device)) {
1280 			platform_device_unregister(device);
1281 			continue;
1282 		}
1283 		devices[i] = device;
1284 		cards++;
1285 	}
1286 	if (!cards) {
1287 #ifdef MODULE
1288 		printk(KERN_ERR "aloop: No loopback enabled\n");
1289 #endif
1290 		loopback_unregister_all();
1291 		return -ENODEV;
1292 	}
1293 	return 0;
1294 }
1295 
alsa_card_loopback_exit(void)1296 static void __exit alsa_card_loopback_exit(void)
1297 {
1298 	loopback_unregister_all();
1299 }
1300 
1301 module_init(alsa_card_loopback_init)
1302 module_exit(alsa_card_loopback_exit)
1303